VERSCHIJNT Gx PER JAAR
JANUARI/FEBRUARI 1989
j , COMPUTERCLUB
POSTBUS 600
n ' AS» ZUTPHEN
NR. 20
Fl. 7,95 / Bfr. 155
Magazine voor
MSX gebruiker
en programmeur
MSX-Gids
DISKMAGAZINE #1
is uit!
MSX TOPPERS OP CARTRIDGE
Fi Spirit autorace CKonami MegaRom) . 75,08
Eggerland 2 (HAL MegaRom) „ 71,56
Kmg's Vaiieg II (nieuwste Konami MegaRom) 81,50
MSX TOPPERS OP CASSETTE
Pac Mania miKisia:>KKUHiautitiiitiiimiimxii8i£miKSMittaac»tiiutvmtimsiixsfir 35,06
Pepsi Cola Mad Mix Chailenge 21,15
The Games, ÜJinter Edition ,„ 31,68
Game Over II <+ Game Over I gratis erbij) 35,80
Vera Cruz Nederlandse versie",,,.,,,,,,,..,, „ „„„„ 11,15
Gunsmoke 31,88
Basket Master 'Basketball) 35,88
Blow Up (soort Boulderdash nieuwe stijl) 21,10
MSX AANBIEDINGEN OP CASSETTE
Tetris (waarschuwing: Super Veslavend !!!) ... „„ 1,15
Mask II 1,15
Venom strikes back (Mask lil) „ ,., 1,15
Death lilish 3 1,15
Master s of the Uni verse 1,15
The Living Daylights (de nieuwste James Bond) 14,15
flce of Rees 14,15
Ülinter Games (MSH-D 14,15
OOK VELE MSH PROGRAMMA'S OP DISKETTE
LEVERBAAR VANAF 14,15
KLAVERJASSEN OP DE COMPUTER
MSH yersie op cassette 14,15
MSH versie op diskette 11,15
PC/MS-DOS versie op 5.25" diskette 11,15
PC/MS-DOS versie op 3,5" diskette 11,15
DAMMEN OP DE COMPUTER
PC/MS-DÖS versie op 5.25" diskette 11,15
PC/MS-DOS versie op 3.5" diskette 11,15
Natuurlijk leveren wij ook het programma dat voor MSH
en MS/S-2 werd uitgeoracht door de MSH Gids !!!
NIEUW ut Duitsiand VOOR MSX OP DISKETTE
COMPILATION DISK I, bevat de programma's
Star Fight / ÜJheels / Monkey / Zirkus / Break Out
Moon Race / Mirror Shot / Pacman / Vier-Gewinnt
Space In y ader?
COMPILRTION DISK 2, bevat de programma's
Solaris / Pipeline / Rescue / Riien / Rabbit / Miraculus
Exodus / Frogger / Ransack / Tic-Tac-Toe
PRIJS PER COMPILATION DISK: 21,10
ELITE
NOG STEEDS EEN ABSOLUTE TOPPER
MSH versie op cassette 51,50
MSH versie op diskette 61,58
PC/MS-DOS versie op 5.25" + 3,5” diskette 81,58
EYE
Een van de veel gevraagde programma's op de HCC dagen.
Uitgebreid besproken in MSH Gids 17, Daarin staat o.a. te
lezen: "Eindelijk weer eens een apart spel uit Engeland
Voor liefhebbers van bordspellen een aanrader "
Beeld, Speikwaliteit en Prijs Cf. 31,003 werden als GOED
beoordeeld. De dokumentatie zelfs als ZEER GOED,
Nu nog verkrijgbaar voor de beursprijs 11,15
VOOR INFORMATIE EN BESTELLINGEN
BEL
828-6659393
Time Soft Amsterdam c.v.
Beukenweg?
1892 AX Amsterdam
Bestellingen beneden f. worden verhoogd Met f. 5,88 verzendkosten
RerixsjrseBenten (bmlen aan de postbode) worden altijd verhoogd wet f. 18,88
NUMMER 20 JANUARI / FEBRUARI 1989
NUMMER 21 VERSCHIJNT ROND 3 APRIL 1989
COLOFON
De MSX-gids is een uitgave van:
Uitgeverij Herps,
Postbus 51 6,
8200 AM LELYSTAD
Tel. 03200-47218 (12.00 tot 14.00 uur)
De MSX-gids verschijnt 6 keer per jaar.
Een abonnement kost f 40, — per 6 nummers en is
te verkrijgen door f 40— over te maken op Post-
banknummer 503601 1
t.n.v. José Herps te Lelystad.
Voor België: Bfr. 750 op Bankrekeningnummer
235-0430464-87 bij de Generale Bank te Hasselt
t.n.v. José Herps, Postbus 516, 8200 AM Lely-
stad.
Hoofd redaktie:
Alfred Debels
Postbus 516
8200 AM Lelystad
Tel. 03200-47221 (12.00 tot 14.00 uur)
Advertenties:
José Herps
Tel. 03200-47218 (12.00 tot 14.00 uur)
Verspreider Nederland:
BETAPRESS, Gilze
Verspreider België:
AMP, Brussel
Uit deze uitgave mag alleen geheel of gedeeltelijk
worden overgenomen en/of vermenigvuldigd, dan
na voorafgaande schriftelijke toestemming van
de uitgever.
De inhoud van de MSX-gids komt voor een groot
gedeelte tot stand door inzendingen van de lezers.
De aansprakelijkheid voor auteursrechten voor in-
gezonden stukken ligt bij deze inzenders.
SUBSCRIPTION PRICE ABROAD:
People living outside the BENELUX have to pay
DG. 60,— a year for 6 issues.
Single copies DG. 1 2,—
Payments can be made cash by registered mail, by
Int. Postal/Money order or by Bank/Giro transfer.
ISSN 0169-9792
INHOUD
LISTINGS
KNIGHT RIDERS ADVENTURE
WERKWOORDEN
PR0HIMA CENTAURI
MSH-2 LISTINGS
SCRABBLE
PATIENCE
PROGRAMMEREN
SCREEN 1 Cvervolg)
ROMMELEN IN DE RAM (Deell)
SOFTWARE
KING’S VALLEY II PASSWORDS
KAART JACK THE NIPPER II .
GAME OVER II
KING’S VALLEY II
THE PEPSI CHALLENGE . . . .
SOUND MACHINE
KAART GOONIES
KAART PIPPOLS
POKES EN TIPS
KAART FEUD
BRIAN CLOUGH’S FOOTBALL . .
BATTLE OF PEGUSS
GOUWE OUWE SOFTWARE . . . .
HAUNTED HOUSE
BLOW UP
26
29
40
41
43
43
44
44
45
46
47
50
51
51
42/52
53
53
DIVERSEN
MINI GIDS
LISTING CONTROLE PROGRAMMA
1
VOORWOORD
LET OP!
S ,„ d E ; t
F'SXsrz s-
zodat de prijs van de diskette kan worden verlaagd naar FL 2 50 zl worden verdeeld,
advertentie hierover elders in het blad. 9 naar 1-L. 2B.50. Zie ook onze nieuwe
sof twaregolf^wee»^" Iosqebal^sten ^Uiteraard 6 ? r ° te stll * e in de nazomer is in november de
& BS irSet h “ a^anbtfd Si^ e ' j-
bracht. Lees hiervooT^e^ne^- ^aina's” (00^ T" 660 nieUwe naam ’, °P nieuw is uitge-
voor het verwerken van deze Gids 9 is Kinn’^ u °V we pagina’s" genoemd). Juist
SSC2SHi2£^pS5.^S3E
rJ— 5 rf“
s^£ï “"«&•£.“ ïïSTJSSSS srijsas
aatste twee hebben we -tot nog toe- nog niets gezien of gehoord, dus helaas vrees ik
dat we deze nieuwe MSX machine ook nooit zullen mogen meemaken.
Alf red.
MSX GIDS DISKMAGAZINE #1
Een P Mqï S rM n ** ï'l” editie Van de MBK Gids is nu het Diskmagazine nr. 1 leverbaar
Een MSX Gids op disk met programma's, artikelen, softwarerecensles, de Mini q^s enz
dus een inhoud die overeenkomt met de gedrukte versie De tekstpn k,mn»„ , - £*1’
beeldscherm werden bekeken „f met behulp S v.„ een pr.nt.r „rdïn' XST
m»V h Ulter rf°. d noodzak '! , J 11 voor bijvoorbeeld handleidingen, zodat deze bij de proqr.m-
ma s bewaard Kunnen worden als naslagwerk. J P ogram
ïoor D FL km i9 9 aT vfa 9 H 3 p at H FL ' f 4 ; 95 k ° Sten - 0n2e abonnees kunnen deze diskette bestellen
. F r”. 19,95 . Vla d f bijgesloten acceptgirokaart, die uitsluitend als service bedoeld is
dus het is met verplicht het bedrag over te maken. ° ,s ’
Alle lezers die voor 28 januari 1989 een abonnement nemen op de MSX Gids kunne
extra diskette ook voor deze lage abonneeprijs van FL. 19,95 in hun bezit krijgen.
ZIE OOK PAGINA 55
deze
2
MSX2-SCRABBLE
Hoewel het originele SCABBLE-spel door
meerdere personen kan worden gespeeld, is
deze computerversie ontworpen voor
slechts 2 personen. Het is namelijk niet
prettig om met meer dan twee spelers te-
gelijk voor de monitor te zitten.
INSTRUCTIES EN INFORMATIES.
Linksboven op het beeldscherm worden in
een venster telkens INSTRUCTIES gegeven
hoe U dient te handelen terwijl in een ven-
ster rechtsonder steeds wat additionele
INFORMATIE wordt gegeven, zoals het nog
beschikbare aantal letters, premies e.d. U
kunt b.v. ook opvragen hoeveel letters van
1 soort zich in het spel bevinden door de
betreffende letter in te tikken. Het ant-
woord verschijnt dan in dat informatieven-
ster.
SPELREGELS.
Hieronder volgen nog in het kort de spel-
regels, toegespitst op deze computerversie:
Het spel bevat 103 letters en 2 jokers,
welke tevoren door de computer worden
'geschud’. De jokers mogen voor elke ge-
wenste letter worden gebruikt. Speler 1
krijgt hiervan 8 willekeurige letters op zijn
letterbalk toegewezen en moet daarmee een
zo groot mogelijk goed Nederlands woord
trachten te vormen en dat in het midden
van het speelveld plaatsen Cl van de let-
ters moet op het sterretje komen te
staan). Tevoren dient U duidelijk af te
spreken welke woorden niet toelaatbaar
zijn, zoals b.v. vervoegingen van werkwoor-
den, afkortingen, eigennamen of der gelijke.
Eventueel kunt U 'Van Dale’ als arbiter la-
ten fungeren. Elk geplaatst woord levert
een aantal punten op, afhankelijk van de
letterwaarde en eventuele premie, doordat
een letter op een premievakje werd gezet.
Over de letterwaarde en de premievakjes
wordt U op het beeldscherm geinformeerd.
Over de puntentelling behoeft U zich trou-
wens weinig zorgen te maken; als de in-
structies goed opgevolgd worden, dan zorgt
de computer voor een feilloze puntentel-
ling. Als speler 1 z’n punten geteld heeft,
geeft hij de beurt over aan speler 2. Ook
deze moet nu met zijn letters een woord
proberen te vormen. Dat woord moet dan
wel tenminste 1 letter bevatten van de
reeds op het bord aanwezige letters, b.v.:
9
r
BROOD of ook: BROODmes
□
t Hier worden de letters m, e en
s aan BROOD toegevoegd en
vormen samen een nieuw woord.
Ook mogen de letters voor en achter een ander
worden geplaatst b.v.:
tui n H U I Sje
De voor- en achterzijde van een woord moeten
altijd wel worden afgesloten door een leeg vak-
je of de rand van het speelveld.
Ook kunnen in een beurt meerdere woorden ge-
vormd worden:
Door toevoeging van de let-
ters e, 1 en g ontstaan de
woorden: TELG ( hor. ) en
ARe ( v ert . ) .
In nevenstaande situatie
is de toevoeging van de
letters r 7 a en p niet
toegestaan, omdat nu de
letters ARr (vert.) geen
goed woord vormen.
Wanneer iemand alle 8 letters ineens kan
plaatsen, wordt een extra premie toege-
kend, welke gelijk is aan de totale letter-
waarde. Ook dit houdt de computer wel voor
U in de gaten. Deze extra premie wordt
dan aangegeven in het informatievenster.
PREMIEVAKJES.
Hoewel de computer bij de puntentelling re-
kening houdt met de premievakjes, dient U
zelf toch wel te zorgen, dat U een optimaal
gebruik maakt van deze vakjes. Want het
gaat uiteindelijk om de punten. Wanneer U
b.v. de letter N (letterwaarde = 1) op een
donkergroen premievakje zet (letterwaarde
x) dan levert dat 3x1=3 punten op. Maar
wanneer U op dat vakje een J (letterwaar-
de = 6) had gezet, dan zou dat 3x6=18 pun-
ten opgeleverd hebben. Als een van de let-
ters van het gevormde woord op een licht-
rood premievakje staat, wordt de woord-
waarde (= som van alle letterwaarden) ver-
dubbeld. Ziet U echter kans om een lang
woord te vormen of een bestaand woord
zodanig te verlengen, dat daardoor 2 licht-
rode vakjes worden bezet, dan levert dat
Ex2=4 maal de woordwaarde op. Bij twee
donkerrode vakjes wordt het dan zelfs
3x3=9 maal de woordwaarde! De premievak-
jes hebben alleen waarde voor diegene, die
daarop een letter plaatst. Bij de volgende
beurt vervalt de premie en geldt voor dat
vakje alleen nog de waarde van de daar
aanwezige letter.
CORRECTIES.
Wanneer een fout wordt gemaakt met het
plaatsen van de letters, kunnen alle let-
ters weer worden teruggezet op de letter-
balk door F1 in te drukken. Wanneer de
punten reeds zijn geteld, wordt ook de
score automatisch gecorrigeerd. Wel gaat
dit ten koste van de bedenktijd, zodat U
zich zult moeten haasten om alsnog een
goed woord op het bord te krijgen. Als een
fout wordt gemaakt met de scoretelling F3
indrukken en opnieuw beginnen.
BEDENKTIJD.
Om te voorkomen dat iemand te lang over
een zet doet, is een tijdbalk aangebracht.
Tevoren kan in onderling overleg de be-
denktijd worden ingesteld op 1, 2 of 3 mi-
nuten. Bij overschrijding van deze tijd wor-
den eventueel geplaatste letters automa-
tisch op de letterbalk teruggezet en gaat
de beurt naar de tegenspeler. Bent U
reeds met de scoretelling bezig, dan kunt
U dit op Uw gemak afwerken. Er wordt in
dat geval niet meer automatisch omgescha-
keld als de tijd verstreken is.
G
RASP
BOOR
Telg
G
RASP
BOOR
T nap
3
EINDE SPEL.
Het spel wordt door de computer automa-
tisch beëindigd wanneer:
a) De letters op zijn en een der spelers
ook. alle letters van zijn balk op het veld
heeft geplaatst.
b) Geen van beide spelers na twee beurten
elk nog een woord heeft kunnen vormen.
Het spel kan ook voortijdig worden beëin-
digd door op de F5-toets te drukken. Het
spel wordt dan afgebroken nadat speler 2
zijn beurt heeft afgewerkt en teruggeeft
aan speler 1. Bij einde spel wordt de score
aangepast, d.w.z. dat dan de letterwaarde
van de nog niet geplaatste letters van de
eindscore wordt afgetrokken. In het geval
dat een der spelers alle letters heeft ge-
plaatst, wordt een extra bonus van 25
punten toegekend, hetgeen wordt aangege-
ven in het informatievenster.
10 ’
2 ® ’* MÖX2-SCRABBLE *
30 ' t %
40 ** Door: G. V. J.v.d. Pol *
50 '* (c ) 1989 MSX Gids Lelystad *
70 1 t *
80 ■ ***m***m**mm#mmm
90 ’
100 SCREBN7 ,2,0: C0L0R4 , 10,3: CLS: DEFIFTA-Z:
OPEF'GRP: "AS#1
110 LI MAS (27) , B$ (7) , CQ4, 14) , D(14, 14) , E(8,
6) , B(104) , S(16)
120 KEY3, : ONKEYGOSUB1750, 130, 140, 130,346
0: GOTO150
130 RETURN
1401 FXX= 1 80THENCT= 1 : G0T01 750ELSERETURN
150 GOSUB3900: ’ Letterset/introductie
160 ’
170 ’ ** Initialisatie **
180 ’
190 FORJ=0TO14: FORI=0TO14: C<J , I)=-1:NEXT:N
EXT
200 F0RI=1T016: S(I )=-l : NEXT
210 ’* Coderen letters
220 RESTORE3550 : FOR I=0TO104 : READA : B(I )=A: N
EXT
230 ' % Schudden letters
240 FOR I = 104TO0STEP- 1
250 R=RND (-T I ME) : J= I NT (RND ( 1 ) 4c I ) + 1
260 SVAPB(J) , B(I) : NEXT
270 ' % Laagste puntentotaal voor speler 1
280 FORI=0TO7 : A1=A1+ ( (B(I ) )MOD100)/10: NEXT
290 F0RD8T015: A2=A2+< (B < I ) )MOD100)/10: NEX
300 IFA2>A1THEN320
310 FOR I =0TO7 : SVAPB ( I ) , B(I+8) : NEXT
320 ' * Definiëren sprites
330 FORJ=0TO2: S$="" : F0RI = 1T032: READAS
340 S$=S$+CHR$ (VAL (" &H" +A$ ) ) : NEXT
350 SPRITES (J)=S$: NEXT
360 ’
370 ’ Opbouw speelveld **
380 '
390 SETPAGE0, 1 : C0L0R1 ,3,3: CLS: COLQR= (14, 5,
5 j 1 )
400 COLOR= (6,6, 1, 1 ) : COLOR= (12, 1,5, 1):C0L0R
= (9, 7, 4, 4)
410 LINE(8, 28)- (340, 210) , 11, BF
420 FORI=29TO209STEP12: LINE(9, I)-(339, I):N
EXT
430 FOR I =9T0339STEP22 : L I NE ( I , 29 ) - ( I , 209 ) : N
EXT
341 21D ( 13 2 B >_<340,210) ’ 13 ’ B:LINE(7 > 27) ~<
450 LINE (6, 27)- (342, 210), 13, B: LINE (6, 0)- (3
42, 26) , 13, BF
<174, 27) , 3, BF: LINEU78, 15)-<
o<3 f f f i 1 » Er*
470 LINE (181, 17)- (334, 25) , 3, BF
480 DRAW”BM175, 119C6R5L10R5U4D8U4E4G8E4F4H
ö
490 FOR 1=1 T08 : RE ADX , Y: LINE(X, Y)-STEP(+20, +
1@> > 6, BF
500 D((X-10)/22, (Y-30)/12)=4: NEXT
510 F0RI=1T016: READX, Y:LINE(X, Y)-STEP(+20.
+10) , 9, BF
520 D((X-10)/22, (Y-30)/12)=3: NEXT
530 F0RI = 1T012: READX, Y: LINE(X, Y)-STEP(+20,
+ 10) , 12» BF
540 D((X-10)/22, (Y-30)/12)=2: NEXT
550 F0RI = 1T024: READX, Y: LINE(X, Y)-STEP(+20
+10),3,BF
560 D((X-10)/22, (Y~30)/12)=l : NEXT: C0L0R1
570 FORJ=0TO2: RESTORE4270: F0RI=182T0322STE
P20 : READA
580 PSETd+J , 11) : DRAW"XA$ (A) ; ” : NEXT: NEXT- C
0L0R7 ’
590 FORJ=0TO2: RESTORE4270: F0RI=185T0325STB
P20: READA
600 PSET(I+J , 12) : DRAV”XA$ (A) ; ” : NEXT: NEXT: C
0L0R1
610 LINE (350,0)- (507, 39), 13, BF: LINE (354, 3)
-(503, 36), 3, BF
620 C0L0R4: PSET (362, 4) : PRINT#1, ”## SPELER
1 ##
630 PSET (346 , 46 ) : PR I NT#1 , " SP" : PSET (350 , 55 )
: PRINT#1, "2
640 LINE (354, 13)- (503, 15) , 13, BF: LINE (363, 3
9)- (366, 63), 13, BF
650 C0L0R1: PSET (360, 18) : PR INT#1, "SCORE WO
QRD:
660 LINE (344, 42)- (360, 63) , 1, B: PSET (400, 28)
: PR INT#1, "TOTAAL:
670 COLOR8: PSET(456, 18) : PRINT#1, " 0”-PSET(
456, 28) : PRINT#1, " O
680 COPY (344,0)- (507, 64)T0(344, 73) : C0L0R4
690 PSET (350 , 128 ) : PR I NT#1 , " 1» : PSET (458,77)
: PRINT#1 , "2
700 LINE (350, 146)- (362, 154) , 6, BF: LINE (350,
154)- (362, 162), 9, BF
710 LINE (350, 162)- (362, 170) , 2, BF: LINE (350,
170)- (362, 178), 3, BF
720 FORI=146TO170STEP8: LINE (350, I)- (362 1+
8) , 1 , B: NEXT: COLOR1
730 PSET (366, 146): PRINT#1,”= 3x WOORDWAARD
E
740 PSET (366, 154) : PRINTfl, ”= 2x WOORDWAARD
E
750 PSET (366, 162) : PRINT#1, "= 3x LETTERWAAR
DE
760 PSET (366, 170) : PRINT#1, "= 2x LETTERWAAR
DE
770 COLOR4: PSET (346, 184) : PRINT#1,”[ Fl] = L
ETTERS TERUG
780 LINE (340, 181)- (507, 211), 13, B: LINE (341,
180)- (506, 210), 13, B
790 SETPAGE0.0: LINE (360, 197)- (504, 208) , 3, B
F: Cl=8: C2=4
800 SWAPC1,C2:C0L0RC1: PSET (380, 199):PRINT#
1, "DRUK EEN TOETS.
810 I$=INKEY$ : I F I $=" " THENFOR I =0TO800 : NEXT :
GOTO800
820 GOSUB4540: ’ Introductie pasr.2
830 COPY (0,0)- (5 11,211), 1TO(0^0) 0
840 F0RI=1T05: KEY( DON: NEXT
850 PSET (181, 18): PRINT#1, " BEDENKT IJD”BT”
min. ”
4
860 L=-l: SP=1; PS=2: X=82: Y=113: XX=187: YY=64
: J S=2 : GOSUB2650
870 PUTSPRITE1 , (XX, YY) , 8, 1
880 '
890 ’ ** Hoofdlus letter keuze
900 1
910 TIME=0
920 IFSP=1THENYY=64ELSEYY=137
930 BEEP: LINE(9, 2)- (174, 27) , 3, BF
940 PSBT (14,3): PRINT#1 , "ZET PIJL OP GEVEN
STE
950 PSET<14, 11):PRINT#1, "POSITIE. DRUK DAA
RNA
960 PSET (38, 19) : PRINT#1 , ”DE VÜURKNOP IN.
970 IFJS<2THEN1010
980 I FST ICK (0 ) >0ORSTR IG <0 ) =- 1THENJS=0 : GOTO
1010
990 I FST I CK ( 1 ) > 0ORSTR I G ( 1 ) =- 1 THEN JS= 1 : GOTO
1010
1000 I FST I CK <2 ) > 0ORSTR I G <2 ) =- 1 THEN J S= 1 : GOT
01010
1010 I F J S= 1 THENST=SPELSEST=0
1020 IFDT> 153ANDV=0THEN1250
1030 XL=250: PUTSPRITE1, <XX,YY>,8,1
1040 DT=INT((TIME*153)/(BT*3000)): IFDT>153
ANDXX> 180THENGOSUB1750
1050 IFDT<154THENLINE(181, 17)-STEP(+DT. +8)
, 8, BFELSEXL=178
1060 IFJS=2THEN970
1070 I$=INKEY$: IFI$=’"’THEN1090
1080 IFASC< I$> >64THENGOSUB3000
1090 FOR I =0TO40 : NEXT : IFXX<187THEN1130
1100 I FST I CK (ST ) =3THENXX=XX+9 : IFXX>XLTHENX
X=XL
1110 I FST I CK (ST ) =7THENXX=XX-9 : IFXX<187THEN
XX=180
1120 GOTO1160
1130 I FW> 0 ANDST I CK (ST ) =3THENXX=XX+7 : IFXX>1
80THENXX=180
1140 I FV< 1 ANDST I CK (ST ) =3THENXX=XX+7 : IFXX>1
87THENXX=196
1150 I FST I CK (ST ) =7THENXX=XX-7 : IFXX<173THEN
XX=173
1160 PUTSPRITE1, (XX, YY> ,11,1: FORI=0TO40: NE
XT
1170 PUTSPRITE1 , (XX, YY) , 8, ls IFXX< 181THEN12
00
1180 KK=(XX-178)/9: IFSP=1THENK=KKELSEK=KK+
8
1190 IFS(K)=-1THEN1030
1200 IFSTRIG(ST) =0THEN1030
1210 PUTSPRITE1 , (XX, YY) , 5, 1
1220 I FXX= 1 73THEN1270ELSE I FXX= 1 80THENGOSUB
1880
1230 GOSUB1400: GOTO920
1240 *
1250 ’ Zet naar tegenspeler **
1260 •
1270 F0RI=1T08: I FE ( I , 0 ) =0THEN1290
1280 D(E(I,3),E(I,4))=0:E(I,0)=0
1290 NEXT: IFSP=2ANDFI=1THEN3200
1300 IFV=0THENTV=TW+1ELSETW=0
1310 LZ=0: CR=0: W=0: VT=0: IFTV=4THEN3200
1320 IFL<105THEN1340
1330 F0RI=1T08: CR=CR+ (S( 1+ (SP-1)*8)MOD100)
\10: NEXT: IFCR=0THEN3200
1340 SWAPSP , PS: XX=187: PSET<456, 18+(SP-1)*7
3) : C0L0R8: PRINT#1 , " O ” : C0L0R1
1350 VV=0:EP=0: AL=0; GOSUB2650 : LINE <181 , 17)
- (334, 25) , 3, BF
1360 PSET (181 , 18) : PRINTfl , ” BEDENKT IJD”BT
"min. " : DT=0: GOTO910
1370 ’
1380 ’** Subroutlne plaatsen letter **
1390 1
1400 LZ=LZ+ 1 ; BEEP : L I NE (9 , 2 ) - ( 174 , 27 ) , 3 , BF
1410 PSET (12, 3): PRINT#1," ZET HET VENSTER
OP
1420 PSET(12, 11): PRINT#1, "JUISTE PLAATS -
DRUK
1430 PSET (12, 19) : PRINT#1, ” DAARNA OP VUURK
1440 FOR I =0TO40 : NEXT
1450 DT=INT( (TIME*153)/(BT*3000) ) : IFDT>153
THEN1750
1460 LINE(181, 17)-STEP(+DT, +8) , 8, BF
1470 I FST ICK (ST ) =1THENY= Y- 12 : IFY<29THENY=2
9
1480 I FST I CK (ST ) =5THENY=Y + 12 : IFY> 197THENY=
197
1490 I FST I CK (ST ) =3THENX=X+ 1 1 : IFX>159THENX=
159
1500 I FST I CK (ST ) =7THENX=X- 1 1 : IFX<5THENX=5
1510 H=(X-5)/ll: V=(Y-29)/12
1520 PUTSPRITE0, (X, Y) , 11, 0: FORI=0TO40: NEXT
1530 PUTSPRITE0, (X, Y) , 8, 0: IFC(H, V) >~1THEN1
470
1540 I FSTR I G (ST ) =0THEN 1440
1550 IFLZ=1THENV1=V: H1=H: LX=0: GOTO1590
1560 IFVO VI ANDH< > H1THEN1440ELSE I FLZ>2THEN
1580
1570 IFV1=VTHENLX=1ELSELX=2
1580 I FLX= 1 ANDV < > V 10RLX=2 ANDH< > H1THEN 1440
1 |90 y E(KK,0)=PO i N t (X^2, Y+D: E(KK, 1)=X:E(KK
1600 E (KK, 3)=H: E (KK, 4)=V: E (KK, 5)=S(K) : E (KK
, 6)=D(H, V)
1610 LI NE (X*2, Y+D-STEP (+20, +10) , 14, BF
1620 E=S(K)\100: A=S(K)MOD10: F=(S(K)MOD100)
\10:C(H, V)=F
1630 PSET (X*2+A+l , Y+10) : DRAW”C4”+”XA$ (E) •
1640 PSET(X*2+A+2, Y+10) : DRAV”C4" +*’ XA$ (E) ;
1650 PSET (X*2+A+3, Y+10) : DRAV ,, C15”+ ,, XA$ (E) :
1660 PSET (X*2+A+4, Y+10) : DRAV”C15”+"XA$ (E) ;
1670 PSET (X*2+A+5, Y+10) : DRAW”C15"+”XA$ (E) :
1680 N=(S(K)MOD100)\10
1690 PSET (X*2+16, Y+6) : DRAV”C1”+”XB$ (N) :
im_LIÏE(2*XX-5, YY) - (2*XX+11, YY-23) , 3, BF:
1710 PUTSPRITE0, (-32, Y), 7,0: RETURN
1720 ’
1730 1 ** Subroutlne terugzetten letters
1740 ’
1750 R=l: F0RI=1T08: IFE ( 1 , 0)=0THEN1800
1760 D(E(I,3),E(I,4)> =E (1,6): IFCT=1THEN180
Q>
1770 LINE(E(I, 1)*2, E ( I , 2) +1) -STEP (+20, +10)
,E(I,0),BF
1780 C(E(I,3),E(I,4))=-1:E(I,0)=0
1790 I FSP= 1THENS ( I )=E ( 1 , 5) ELSES ( I +8 ) = E ( 1 , 5
1800 NEXT: IFCT=1THEN1840ELSELZ=0
1810 IFC(7,7)=-1THENDRAV"BK175, 119C6R5L10R
5U4D8U4E4G8E4F4H8
1820 IFSP=1THENC0PY (368, 0)- (510, 23) , ITO (36
8, 41) , 0
1830 IFSP=2THENC0PY (368, 0)- (510, 23) 1TQ(36
8, 114) , 0
1840 WT=0: W=-W: GOTO2270
1850 ’
1860 •** Subroutlne puntentelling %%
1870 1 6
1880 LI NE (346, 192)- (505, 209) , 3, BF: C0L0R4
1890 PSET (346, 193) : PRINTfl , "I F3I = CORR. TE
LL I UG
1900 PSET (346, 202) : PRINT#1 , "I F5I = EINDE S
PEL.
1910 Q=l: P=0: V=0: FF=0: C0L0R8
1920 BEEP: LINE(9, 2)- (174, 27) , 3, BF
5
P 9 d1» TpIIt < 12 f 1 i > PR 1 WT#1 ' " ZET HET KRUIS 0
1940 IFP=0THEN:PRINT#1, "EERSTE LETTER - DR
UK.
1950 IFP=1THEN: PRINT#1 , "LAATSTE LETTER- DR
UK
1960 PSET(12, 19) : PRINT#1, " DAARNA OP VUURK
THeSdT=153 T< <TI ^ 153>/<BT * 3000) ) : IFDT>153
1980 LI NE (181, 17) -STEP (+DT, +8) , 8, BF
1990 FOR I =0TO40 ; NEXT
IFSTICK (ST)=1THENY=Y-12: IFY<29THENY=2
2000
9
2010 IFSTICK (ST)=5THENY=Y+12: IFY> 197THENY=
197
2020 I FST I CK < ST ) =3THENX=X+ 1 1 : IFX>159THENX=
lo9
fjjjj IFSTICK (ST)=7THENX=X-11: IFX<5THENX=5
2040 H=(X-5)/ll: V=(Y-29)/12
2050 PUTSPRITE0, (X, Y) , 11, 2: FORI=0TO40: NEXT
2060 PUTSPRITE0, <X,Y),8,2
2070 IFSTRIG<ST)=0THEN1970
2080 *
2090 P=P+1 : PUTSPRITE0, (X,Y),3,2
2100 IFC<H, V)=-1THEN2590
2110 IFP=1THENX1=X: Y1=Y: GOTO1920
2120 IFX<X1ORY<Y1THEN2590
2130 I FX 1 < > XANDY 1 < > YORX 1 =XANDY 1= YTHEN2590
2140 IFY1=YTHEN2210
2150 ’
2160 H= (Xl-5)/ll
2170 IFY1=29THEN2180ELSE IFC (H, (Yl-41)/12)>
-1THEN2590
2180 IFY=197THEN2190ELSEIFC(H, (Y-17)/12)>-
1THEN2590
2190 FOR I =Y 1 TOYSTEP 12 : V= ( I-29)/12: GOSUB241
0; NEXT: GOTO2260
2200 ’
2210 V= (Yl-29)/12
2220 IFX1=5THEN2230BLSEIFC( (XI- 16) /II V)>-
1THEN2590 ’
2230 I FX= 159THEN2240ELSE I FC ( (X+6 ) /I 1 , V ) > - 1
THEN2590
2240 FORI=Xl TOXSTEP 1 1 : H= ( I -5 ) /1 1 : GOSUB2410
: NEXT
2250 *
2260 ¥T=¥T+1: IFQ=0THEN¥=FFELSE¥=FF*Q
2270 KEY(l)OFF: COLOR8: IFSP=2THEN2350
2280 ’
2290 F0RI=1T08: IFS(I )O-1ORAL=1THEN2310
2300 NEXT: IFPL=0THENGOSUB2450: ¥=¥+EP
2310 LINE(456, 18)- (496, 36) , 3, BF
2320 Tl=Tl+¥: ¥¥=¥¥+¥: PSET(456, 18) : Z$=STR$ (
V) : GOSUB3500
2330 PSET (456, 28) : Z$=STR$ (Tl) : GOSUB3500: GO
TO2470
2340 ’
2350 F0RI=9T016: IFS( I )O-1ORAL=1THEN2370
2360 NEXT: IFPL=0THENGOSUB2450: ¥=¥+EP
2370 LINE(456, 91)- (496, 109), 3, BF
2380 T2=T2+¥: ¥¥=¥¥+¥: PSET (456, 91) : Z$=STR$(
¥) : GOSÜB3500
OTO2470 ET <456> 101 ) ! Z$=STR$ <T2) : GOSUB3500: G
2400 ’
2410 F=C(H, V) : IFC(H, V)=-1THEN2590
2420 IFD(H, V)=4THENQ=Q*3ELSEIFD(H, V)=3THEN
Q=Q*2
2430 IFD (H, V)=2THENF=F*3ELSEIFD(H, V)=1THEN
F-F^2
2440 FF=FF+F: RETURN
2450 F0RI = 1T08; EP=EP+ (E ( I , 5) MOD100)\10: NEX
T:AL=1: RETURN
2460 ’
2470 IFR=1THENR=0: ¥¥=0
<_32 ’ ï2> ' 16 .^“LO S 1,OT<1
2490 BEEP: LINE (346, 192)- (505, 209) , 3, BF: COL
0R8
2500 I FDT > 153 AND¥=0THEN25 10ELSE2530
2510 PSET (402, 193) : PRINT#1, "JAMMER
2520 PSET (370, 202) : PRINT#1 , "U ¥AS TE LAAT»
” : GOTO2570
bSbi (350, 193) : PRINT#1 , "SCORE IS BIJGE
¥ERKT” : IF¥T=0THEN2550
2540 PSET (374,202) : IF¥T=1THENPRINT#1 ” ( 1
¥OORD )"ELSEPRINT#l,"(”¥T"¥OORDEN )
2550 I FEP=0THEN2570ELSEZ$=STR$ (EP ) : PSET (35
0,202): PR INT#1, "EXTRA PREMIE”;
2560 GOSUB3500: PRINT#1 , ”pnt
2570 FORI=0TO800: NEXT: COLOR1: EP=0: IFCT=1TH
ENAL=0: CT=0
2580 RETURN920
cwv LIJ» b(9, 2)- (174, 27) , 3, BF: PSET (28, 6) : PR
INT#1, "OPNIEU¥ BEGINNEN
2600 BEEP: PSET (20, 16) : PRINT#1, ”BIJ EERSTE
LETTER!
2610 FOR I=0TO800: NEXT: GOTO1880
2620 ’
2630 1 Subroutine aanvullen letters **
2640 ’
2650 LL=0: IFSP=1THENY0=52ELSEY0=125
2660 Z=Z+1: IFZ<3THEN2700
2670 IFSP=1THENC0PY (368, 41)- (510, 64) , 1T0<3
68. 41 ) , 0
2680 I FSP=2THENC0PY (368 , 4 1 ) - (5 10 , 64 ), ITO (3
68, 114), 0
2690 IFSP=1THENC0PY (368, 114)- (510, 137) , 0TO
(368, 41), 1
2700 I FSP=2THENCOPY (368 , 4 1 ) - (5 10 , 64 ) , 0TO (3
68.41) , 1
2710 I FSP=2THENL I NE (368 , 4 1 ) - (5 10 , 64 ) , 3 , BF
2720 I FSP= 1 THENL I NE ( 368 , 114)-(510, 137), 3, B
F
2730 F0RI=1T08: J= I : IFSP=2THENJ=I+8
2740 I FS ( J ) < >- 1THEN2850
2750 LL=LL+1 : IFL+LL) 104THENL=L+LL: GOTO2910
2760 A=B(L+LL)MOD10: E=B(L+LL)\100: F=(B(L+L
L ) MOD100 ) \10 : S ( J ) =B (L+LL ) : X0=353
2770 LINE (X0+ 1*18-2, Y0+2)-STEP(+14, -11) , 1,
B
2780 LINE(X0+I*18-1, Y0+1)-STEP(+15,-11) 14
, BF
2790 PSET (X0+I*18+A-l, Y0) : DRA¥”C5”+”XA$ (E)
2800 PSET (X0+IX18+A, Y0) : DRA¥"C5"+"XA$ (E) ;
2810 PSET (X0+IX18+1+A, Y0) : DRA¥"C15”+"XA$ (E
2820 PSET (X0+IX18+2+A, Y0) : DRA¥"C15"+”XA$ (E
2830 PSET (X0+IX18+3+A, Y0) : DRA¥”C15”+"XA$ (E
2840 PSET (X0+IX18-4, Y0+4) : Z$=STR$ (F) : GOSUB
3500
2850 NEXT: L=L+LL: LB=104-L: IFLB=0THEN2910
2860 BEEP: LINE (346, 192)- (505, 209) , 3, BF: Z$=
STR$ (LB) : IFLB=1THEN2890
2870 PSET (370, 193) : PRINT#1, ”ER ZIJN NOG
: GOSUB3500
2880 PSET (378, 202) : PRINT#1 , "LETTERS OVER "
: GOTO2930
2890 PSET (382, 193) : PRINT#1 , "ER IS NOG 1
2900 PSET (382, 202) : PR INT#1, "LETTER OVER.":
GOTO2930
2910 LINE (346, 192)- (505, 209) , 3, BF
2920 PSET (350, 197) : COLOR6: PRINT#1, "DE LETT
ERS ZIJN OP! " : COLOR1
2930 IFSP=2THENCOPY (368, 114>-(510, 137), 0TO
(368,0), 1
2940 IFSP=1THENC0PY <368, 41 )- <510, 64) , 0TO<3
68,0), 1
2950 PL=0: F0RI=1T08: IFS(I+<SP-1)*8)=-1THEN
PL=1
2960 NEXT: RETURN
2970 •
2980 ’ ** Subroutine aantal letters **
2990 ’
3000 G=ASC(I$) : IFG>96THENG=G-32
3010 I FG> 90THENRETURN
3020 BEEP : LINE (352 , 192 ) - <505 , 209 ) , 3 , BF
3030 IFG=810RG=880RG=89THENN=1
3040 IFG=70ORG=74ORG=80ORG=87ORG=90THENN=2
3050 I FG=670RG=750RG=760RG=770RG-850RG=86T
HENN=3
3060 IFG=660RG=71QRG=720RG=83THENN=4
3070 IFG=730RG=790RG=84THENN=5
3080 IFG=680RG=82THENN=6
3090 IFG=65THENN=7
3100 IFG=78THENN=8
3110 I FG=69THENN=14
3120 LI NE <346, 192>- (500,209) , 3, BF: IFN=1THE
1Ï3150
3130 PSET <360, 193) : PRINT#1 , "ER ZIJN IN TOT
AAL
3140 PSET (352, 202) : PRINT#1, NCHRS (G)" ’ s IN
HET SPEL" : RETURN
3150 PSET <368 , 193 ) : PR I NT#1 , ” ER IS MAAR 1 "
CHRS (G)
3160 PSET <376, 202) : PRINT#1 , " IN HET SPEL.":
RETURN
3170 -
3180 ' tt Einde spel tt
3190 ’
3200 KEY (l)OFF : BEEP: LINE (181 , 17)- <334, 25) ,
3 , BF : C0L0R8
3210 BEEP: LINE (181 , 17)- (334, 25) , 3, BF: COLOR
8
3220 CR=0: PSET (217, 18): PRINT#1, "EINDE SPEL
3230 IFSP=2THENC0PY (368, 41)- (510, 64) ITO (3
68, 41 ) , 0
3240 IFSP=1THENCQPY (368, 41 )- (510, 64) , ITO (3
68, 114), 0
3250 FOR I = 1T08 : CR=CR+ <S < I ) MOD100 ) \10 : NEXT
3260 LINE (346, 184)- (505, 209) , 3, BF
3270 IFSP=lANDCR=0ANDL>104THENCR=-25: GOSUB
3440
3280 T1=T1-CR:CR=0: PSET (360, 18) : Z$=STR$ (Tl
) : PRINT#1 , " EINDSTAND: " ; : GOSUB3500
3290 F0RI=9T016: CR=CR+ (S ( I )MOD100)\10: NEXT
3300 I FSP=2ANDCR=0ANDL> 104THENCR=-25 : GOSUB
3440
3310 T2=T2-CR: PSET (360, 91) : Z$=STR$(T2) : PRI
NT#1 , " EINDSTAND; » ; : GOSUB3500
3320 LINE(8,2)-(174,27),3,BF
3330 PSET (16, 6) : PRINT#1,"[ F1 I = EINDE
3340 PSET <16, 16) : PRINT#1, ”[ F2 I = OPNIEUW
” : COLOR4
3350 I FT1=T2THEN3370ELSE I FT1 > T2THENSP= IELS
ESP=2
3360 PSET (350, 202) : PRINT#1 , "SPELER" SP" IS W
INNAAR" :GOTO3380
3370 PSET (378, 202) : PRINT#1 , "GELIJK SPEL!
3380 ONKEYGOSUB3400, 3420: KEY(l)ON: KEY(2)0N
3390 GOTQ3390
3400 CLS: SCREEN1 : COLOR 1 ,2,2: KEY3, "goto ” : K
EYOFF 6
3410 LOCATE13, 10: PR INT” EINDE” : : LOCATE0, 20:
END
3420 CLS: RUN
3430 ’
3440 BEEP: PSET (368, 184) : PRINT#1, ”25 BONUSP
UNTEN
3450 PSET (372, 193) : PRI NT#1, "VOOR SPELER"SP
: RETURN
3460 FI=1: RETURN
3470 ’
3480 ' ** Wijzigen 0 in O **
3490 1
3500 FORB=lTOLEN(Z$) : IFMID$(Z$,B, 1)="0"THE
NMID$ (Z$, B, 1)="0”
3510 NEXT: PRI NT#1,Z$+" ";: RETURN
3520 ’
3530 ’ *X Data Letter nr. , -waarde, -X-shi ft
**
3540 1
3550 DATA 10,10,10,10,10,10,10,131,131,131
, 131, 252,252,252,321, 321,321,321, 321
3560 DATA 321,411,411,411,411,411,411,411,
411, 411, 411, 411, 411, 411, 411, 551, 551
3570 DATA 632,632,632,632,731,731,731,731,
825, 825, 825, 825, 825, 962, 962, 1041, 1041
3580 DATA 1041,1141,1141,1141,1240,1240,12
40, 1311, 1311, 1311, 1311, 1311, 1311, 1311
3590 DATA 1311,1422,1422,1422,1422,1422,15
51, 1551, 1673, 1721, 1721, 1721, 1721, 1721
3600 DATA 1721,1831,1831,1831,1831,1926,19
26, 1926, 1926, 1926, 2032,2032,2032, 2144
3610 DATA 2144,2144,2252,2252,2370,2475,25
50,2550,2601,2601
3620 ’
3630 ’ ** Sprite data **
3640 ’
3650 DATA FF, C0, C0, C0, C0, C0, C0, C0
3660 DATA C0, C0, FF, 00, 00, 00, 00, 00
3670 DATA E0, 60, 60, 60, 60, 60, 60, 60
3680 DATA 60, 60, E0, 00, 00, 00, 00, 00
3690 DATA 20, 70, F8, 20, 20, 20, 20, 00
3700 DATA 00 , 00 , 00 , 00 , 00 , 00 , 00 , 0®
3710 DATA 00,00,00,00,00,00,00,00
3720 DATA 00,00,00,00,00,00,00,00
3730 DATA 00, 0C, 0C, 0C, 0C, 7F, 7F, 0C
3740 DATA 0C, 0C, 00, 00, 00, 00, 00, 00
3750 DATA 00,00,00,00,00,80,80,00
3760 DATA 00,00,00,00,00,00,00,00
3770 ’
3780 ' Premievak data **
3790 ’
3800 DATA 10,30,164,30,318,30,10,114,318,1
14, 10, 198, 164, 198, 318, 198
3810 DATA 32,42,54,54,76,66,98,78,296,42,2
74,54,252,66,230,78,32
3820 DATA 186,54,174,76,162,98,150,296,186
, 274, 174, 252, 162, 230, 150, 120
3830 DATA 42,208,42,32,90,120,90,208,90,29
6,90, 32, 138, 120, 138,208, 138
3840 DATA296, 138, 120, 186,208, 186, 76,30,25
142, 54, 186, 54, 10, 66, 164, 66, 318
3850 DATA 66,54,102,142,102,186,102,274,10
2,76, 114,252, 114,54, 126, 142, 126, 186
3860 DATA 126,274,126,10,162,164,162,318,1
62, 142, 174, 186, 174,76, 198,252, 198
3870 '
3880 ’ tt Letter/cijfer set tt
3890 ’
3900 A$ (0)=”rl 12rlu4e4rf 4dl 18r8d3rl 12” : ’A
3910 A$(l)="12r2u8I2r9f2g216r6f2g217": 'B
3920 A$ <2)="h2u4e2r6f21i216g2d4f2r6e2" : ’C
3930 A$(3)="12r2u812r8f3d2g317”: ’D
3940 A$ (4)=” 12r2u812rl0dlull8d4r414d4r8ul’ 1
: ' E
3950 A$ (5)=” 12r2u812rl0dlull8d4r414d4r2” : ’
F
3960 A$ <6)="h2u4e2r6f2h216g2d4f2r6e2u214dl
3970 A$ (7)="12rlu811r211d4r9u411r211d8Ilr2
h : ’ H
3980 A$ <8)=” 12r412u812r4” : ' I
3990 A$(9)="h2f2r4e2u618dl": ’ J
7
4r4f4rll3”: > ^K rll3r2U812r311d3r4e3r211s3d ll
4010 A$ (Il)="r8uldlll0r2u812r4" : ’ L
4020 AS (12)=”llr211u811r2f4rle4r211d8rll2"
t 1 M
4030 A$ (13)=” Ilr211u811rlf8rlllu811r2” : ’ N
4040 AS ( 14)="r6e2g216h2u4e2r6f2d4" • 1 O
4050 AS (15)=" 12r412u812r9f2g216” : ’P
4060 A$ (16)=”h2u4e2r6f2d212dlr2dlf2h2g216”
4070 AS (17)=’’ 12r412u812r9f2g216r3f4rl 12” : 1
R
4080 A$(18)=”hluldlflr6e2h216h2e2r6fldl”: ’
O
4090 A$ <19)=” 12r412u8116dlulrl3dl” : ’T
4100 A$(20)=”h2u611rld6f2r3e4u411r211d8rl”
2llS 1 e?i2"- > ' ; v h2U2hlUlh2r212f2dlfld2f2r2e2u
4120 A$ (22)=”h3u5rllld5f3e3u4d4f3e3u511" • ’
W
4f411 A 2" 23 X = ” llr211e41l411r211f4rle411r211 S
4140 AS <24)=" 12r412u3h511r211f5e511r2” : 'Y
4150 AS (25)=" Ilrlluldlll0e4rle4rlllldl" : 'Z
ü 6 ? J f $ o <26)= ” r9u4rlu4111rlld315u2 lld215u31
d3rld4u3rld2r7u2’’ : 'Joker
4170 '
4180 BS (0)=”r3d413u4” : BS (1 )=”rld4” • BS (2)=”
r3d213d2r3” : BS <3>=”r3d212r2d213"
4190 BS (4)=”d2r3uld3” : BS (5)='*r313d2r3d213"
: BS (6)-”r212d4r3u213” : BS (7)="r3dlsr3”
4200 ’ 6
4210 1 ** Introductie pag 1 **
4220 ’
4230 FORJ=0TO2: RESTORE4270: FORI=180TO320ST
EP20: READA
4240 PSET ( I+J , 13) ; DRAW”XA$ <A) ; ” : NEXT: NEXT'
C0L0R8
4250 FORJ=0TO2: RESTORE4270: F0RI=182T0322ST
EP20: READA
4260 PSET ( I + J , 13) : BRAV'XAS (A) ; ” : NEXT: SEXT
4270 DATA 18,2,17,0,1,1,11,4
4280 C0L0R1 : PSET (0, 18)
4290 PRINT#!,'' De spelregels voor deze M
SX-versie van SCRABBLE zijn gelijk
4300 PRINT#1," aan die van het orginele
bordspel. Er zijn in totaal 103
4310 PRINT#1 , " letters en 2 jokers beschik
baar.
4320 PRINT#! MSX-srcabble . kan naar keu
ze gespeeld worden met 2 JOYSTICKS
ïSranJw^* 1 *"*. 0 * beurtel ings op het TOETS
nWBQRD (cursortoetsen + spatiebalk).
Elke s P eler krijgt de bes
chikkmg over 8 letters. Bij een
4350 PRINT#1 , " volgende beurt worden de
ze door de computer weer aangevuld
4360 PRINT#1 , ” Speler 1 begint.
4370 PRINT#1 , " De gewenste letter wordt
gekozen door met de STICK de pijl
4380 PRINT#1, " onder de letter te plaatsen
en vervolgens de VUURKNOP in te
4390 PRINT#1 , " drukken. Op het speelveld w
ordt nu een ruiter zichtbaar. Deze
4400 PRINT#1, " kan met de STICK op het g
e wenste vakje worden gezet. Na een
4410 FRINT#1, " druk op de VUURKNOP wordt
de letter daar dan geplaatst.
4420 PRINT#1 , " 5 y
44^0 PR INT#1 , " Als een woord gevormd is,
dan de pijl onder het scorevenster
4440 PRINT#1,” zetten (paarse lijn) voor d
e puntentelling. Druk op de VUURKNOP”:
4450 PRINT#1 , " en volg de aanwijzingen in
het instructievenster linksboven.
4460 PRINT#1,” Bij meerdere woorden deze p
rocedure herhalen. PR INT#1, ’’
4470 PRINT#1 , ” Het spel kan aan de ander
e speler worden doorgegeven door de
4480 PRINT#1 , " pijl onder het betreffende
venster te plaatsen en daarna op de
4490 PRINT#1, " VUURKNOP te drukken.
4500 RETURN
4510 '
4520 ’ ** introductie pag.2 **
4530 ’
4540 C0L0R1, 10,3: CLS: PSET (0,8)
4550 PRINT#1,” Bij een eventuele vergiss
ing kunnen -alle- zojuist geplaatste”;
4560 PRINT#1, ” letters weer worden terugge
zet door [ F1 ] in te drukken.
4570 PRINT#1,” Ook nadat de punten zijn
geteld kunnen de letters nog terug
4580 PRINT#1 , " worden genomen, de computer
corrigeert dan tevens de score.
4590 PRINT#1 , ” Door C F3 ] in te drukken
kan alleen de (foute) scoretelling
4600 PRINT#1,” ongedaan worden gemaakt ( d
e letters blijven staan ).
4610 PRINT#1, " Nadat I F5 ] is ingedrukt
wordt het spel voortijdig beëindigd";
4620 PRINT#1 , " wanneer speler 2 de beurt h
eeft afgewerkt. Voor een tijdelijke
4630 PRINT#1," onderbreking: nè de puntent
elling stoppen. ": PRINT#1, "
4640 PRINT#1 , " Het aantal -gelijknamige-
letters dat in totaal aanwezig is
4650 PRINT#1 , ” kan worden opgevraagd door
de betreffende letter in te tikken.
4660 PRINT#1,” De informatie verschijnt da
n in het informatievenster rechts-
4670 PRINT#1, " onder op de monitor. ”: PRINT
4680 PRINT#1 , " Midden boven in het beeld
geeft een tijdbalk de bedenkktijd
4690 PRINT#1,” aan. Vanneer deze tijd is v
er lopen en U bent nog bezig met het
4700 PRINT#1,” plaatsen van de letters dan
wordt automatisch omgeschakeld naar” ;
4710 PRINT#1,” de andere speler. De alreed
s geplaatste letters worden op de
4720 PRINT#1, " letterbalk teruggezet.
4730 PRINT#1," Als de tijd verstreken is
tijdens het tellen dan wordt niet
4740 PRINT#1 , ” omgeschakeld, zodat U de te
lling rustig kunt afwerken.
4750 PRINT#1," De bedenktijd (1, 2 of 3
minuten ) kunt U nu in onderling
4760 PRINT#1 , ” overleg vaststellen en hier
onder intikken:”
4770 C0L0R8 : PSET (400, 202): PR INT#1,” VEEL PL
EZ IER!
4780 PSET (8, 202) : PRINT#1, "Hoeveel minuten
?” ;
4790 I$=INKEY$: IFI$="”THEN4790
4800 BT=VAL (1$) : I FBT=0ORBT>3THEN4780ELSEPR
INT#1 , BT
4810 FOR I =0TO800 : NEXT : C0L0R1 , 3 , 3 : CLS : RETUR
contrqletell
Reg» 1 :
Regel ;
Regel :
Regel :
Regel :
Rege 1 :
Rage 1 :
Regel :
Regel :
Rege 1 :
Regel :
Regel ;
Regel :
Regel :
Rege I ;
1 0
20
30
40
5CJ
70
80
30
iee
i 1 0
120
130
140
I 50
1 £0
ING
- 58
5ó
- 58
58
58
58
58
58
- 80
- 24 1
- 210
- 142
- 117
- 90
58
Regel :
1 70
-
58
Regel :
330
_
208
Rege 1 :
1 80
-
58
Regel :
340
-
93
Rege 1 :
1 90
-
1 63
Regel :
350
-
1 69
Regel :
200
-
1 ES
Regel :
360
-
56
Regel :
21 ö
-
58
Rage 1 :
370
-
58
Regel :
220
-
223
Rege 1 ;
380
-
58
Regel :
230
-
58
Regel :
390
-
213
Rege 1 :
240
-
25 1
Regel :
400
-
250
Regel :
250
-
71
Regel :
4 1 0
-
43
Rege 1 ;
260
-
70
Rege 1 ;
420
68
Regel :
270
-
58
Regel :
430
_
78
Regel :
260
-
1 12
Regel ;
440
_
8
Regel :
290
-
128
Regel .
450
_
1 23
Rege 1 :
300
-
1 35
Regel :
460
_
226
Rege 1 :
310
-
69
Regel :
470
_
b
Regel :
320
58
Regel :
480
-
0
Regel
49®
- 21 1
Regel
: 1 650 - 1 89
Rege 1
: 5®®
“ 39
Rege 1
. 1 660 -
1 90
Regel
: 5io
- 220
Rege 1
; 1 670 - 191
Rage 1
: 520
38
Rege
1680 -
0
Rege 1
: 530
- 217
Rege
1 690 -
■ 1 05
Rsge 1
54®
- 37
Rege
1 700 -
166
Regel
: 55®
- 222
Rege
1710 -
247
Rege 1
: 556
45
Rege
1 720 -
68
Rege i
57®
60
Rege
173® - 58
Rege 1
5S0
44
Rege
1 740 -
58
Rege 1
590
- 66
Rege
1750 -
35
Rege 1
: 600
- 39
Rege
1 760 -
101
Rege 1
: 6 1 ®
20
Rege
1 77® -
213
Rege 1
: 52®
- 125
Rege
1 780 -
72
Rege 1
: 530
- 1 92
Rege
1 79® -
232
Regel
640
- 204
Rege
1 800 -
128
Rege 1
550
- 1 89
Rege
lèïw -
7 2
Rege
660
- 102
Rege
1 820 -
64
Rege
670
- 1 22
Rege
1830 -
1 38
Rege
680
- 222
Rege
1840 -
1 30
Rege
690
- 33
Rege
1850 -
58
Rege
700
- 9
Rege
1 86® -
58
Rege
710
63
Rege
1870 -
58
Rege
720
- 1 99
Rege
1 880 -
215
Rege
7 3®
32
Rege
1890 -
245
Rege
74®
39
Rege
1 900 -
1 1 6
Rege
750
- 117
Rege
1910 -
67
Rege
760
- 124
Rege
1920 -
1 57
Rege
77®
- 77
Rege
193® -
21 4
Rege
78®
- 56
Rege
194® -
94
Rege
79®
- 219
Rege
195® -
1 33
Rege
800
- 101
Rege
1 96® -
40
Rege
8 i 0
- 2?
Rege
1970 -
188
Rege
820
- 220
Rege
1980 -
231
Rege
830
- 213
Regel
1990 -
1 52
Rege
840
- 1 73
Rege
2000 -
53
Rege
850
- 244
Rege
20 10 -
1 34
Rege
860
- 191
Rege
2®20 -
51
Rege
870
- 26
Rege
2030 -
1 0
Rege
860
- 58
Rege
2040 -
76
Rege
890
58
Regel
2050 -
60
Rege
900
58
Rege
2060 -
1 05
Rege
9 1 ®
- 203
Rege
2070 -
1 98
Rege
920
- 1 3
Rege
2080 -
58
Rege
930
- 1 57
Regel
209® -
43
Rege
940
- 97
Rege 1
2100 -
236
Rege
950
44
Rege
2110 -
234
Rege
960
- 252
Rege 1
2120 -
64
Rege
970
8
Regel
2130 -
1 60
Rege
980
1 84
Regel
2 140 -
239
Rege
990
- 1 87
Regel
2150 -
53
Rege
1000
189
Rege 1
2 16® -
39
Rege
10 10
1 9®
Regel
2 170 -
40
Rege
1 020
212
Rege 1
2 180 -
96
Rege
103O
2 40
Rege 1
2190 -
101
Regel
1 04®
91
Rege 1
220® -
58
Rege
1050 -
- 1 72
Regel
2210 -
77
Rege 1
1060 -
■ 223
Regel
2220 -
54
Rege 1
1070 -
■ 219
Rege 1
2230 -
1 09
Rege 1
1 080 -
■ 82
Regel
2240 -
1 44
Rege 1
1090 -
29
Regel
2260 -
58
Rege 1
1100-
1 27
Regel
2260 -
251
Regel
1110-
■ 2®3
Rege 1
2270 -
1 79
Rege 1
1 120 -
35
Regel
2280 -
58
Rege 1
1130 -
7
Rege 1
2290 -
206
Rege J
1140-
33
Rege 1
2300 -
31
Regel
1150-
1 8®
Rege 1
2310 -
213
Regel
1160 -
237
Regel
2320 -
2 52
Regel
1170-
223
Rege 1
233® -
1 08
Rege 1
1180-
1 5
Rege 1
2340 -
58
Regel
1190-
95
Regel
2350 -
24
Rege 1
1200 -
23
Rege 1
2360 -
et
Rege 1
1210 -
23
Regel
2370 -
1 03
Rege 1
1220 -
1 00
Rege 1
2380 -
71
Rege 1
1230 -
1 32
Regel
2390 -
1 82
Rege 1
1 240 -
58
Regel
2400 -
58
Rege 1
1250 -
58
Regel
24 10 -
1 85
Rege 1
1260 -
58
Regel
2420 -
1 53
Regel
1270 -
1 5®
Regel
2430 -
1 05
Rege 1
1280 -
86
Rege 1
2440 -
6
Regel
1290 -
231
Regel
2450 -
68
Rege 1
1 300 -
1 38
Rege 1
2460 -
58
Rege 1
1310 -
21 1
Regel
2470 -
242
Rege 1
1 320 -
1 04
Rege 1
2480 -
2
Rege 1
1 330 -
67
Rege 1
2490 -
213
Rege 1
1 340 -
1 64
Rege 1
2500 -
1 53
Rege 1
1 350 -
t 89
Rege 1
2510 -
20®
Regel
1 36® -
4®
Rege 1
2520 -
1 2®
Rege 1
1370 -
58
Rege 1
2530 -
151
Rege 1
1 380 -
58
Regel
2540 -
38
Regel
1390 -
56
Regel
2550 -
1 86
Rege 1
1 400 -
21
Regel
2560 -
244
Regel
1410 -
246
Regel
257® -
1 3
Rege 1
1420 -
30
Rege 1
2580 -
55
Rege 1
1 430 -
40
Rege 1
2590 -
57
Regel :
1 440 -
1 52
Regel
2600 -
1 51
Regel :
1 450 -
1 1 9
Rege 1
26 10 --
208
Rege 1 :
1 460 -
231
Rege 1
2620 -
58
Regel ;
1 470 -
53
Regel
2630 -
58
Regel :
1480 -
134
Regel
2640 -
58
Regel :
1 490 -
51
Regel
2650 -
1 17
Regel :
1 500 -
10
Regel
2660 -
71
Regel :
1510-
76
Rege 1
2670 -
1 44
Regel i
1520 -
56
Regel
2680 -
218
Regel :
1530 -
39
Regel
269® -
34
Regel ;
1 540 -
1 78
Rege 1
270O -
1 45
Regel :
1 550 -
1 73
Regel
2710 -
200
Rege 1 :
1 566 -
1 43
Rege 1
2 72® -
89
Regel :
1570 -
87
Rege 1
2/30 -
74
Regel :
1 580 -
1 6®
Rege 1
274® -
1 12
Regel :
1590 -
84
Regel
27S0 -
69
Regel :
1 600 -
1 2
Regel
2760 -
74
Rege 1 :
1610 -
76
Regel
2770 -
1 65
Regel :
1620 -
254
Rege 1
2780 -
245
Rege 1 ;
1630 -
1 37
Regel
2790 -
41
Rege 1 ;
1 640 -
1 36
Rege 1
2800 -
37
Regel : 281 0 - 89
Rege 1
: 2820 -
- 90
Regel
: 2830 - 91
Rege 1
: 2840 - 9
Rege 1
: 285® -
- 221
Rege
286® -
- 110
Rege
287® - 237
Rege
2880 - 26
Rege
2890 -
- 1 60
Rege
2900 -
- 203
Rege
2910 -
- 203
Rege
292® -
28
Rege
293® -
- 252
Rege
2940 - 10S
Rege
2950 -
- 1 65
Rege
296® -
76
Rege
2970 -
- 58
Rege
2980 - 58
Rege
2990 -
58
Rege
3000 - 105
Rege
3Ó10 -
1 45
Rege
3020 -
203
Rege
3030 -
11S
Rege
3040 -
123
Rege
2050 -
249
Rege
3060 -
2 12
Rege
3070 -
97
Rege
3080 -
208
Rege
3090 -
64
Rege
3100 -
78
Rege
3110-
73
Rege
312® -
28
Rege
313® -
1 1 2
Rege
314® -
238
Rege
315® -
62
Rege
3160 -
255
Rege
3170 -
58
Rege
318® -
58
Rege
3190 -
58
Rege
3200 -
1 00
Rege
2210 -
16
Rege
3220 -
30
Rege
323® -
1 45
Rege
3240 -
217
Rege
3250 -
1 28
Rege
3260 -
195
Regel
3278 -
43
Rege
3280 -
202
Rege
3290 -
1 42
Regel
330® -
44
Rege
331® -
71
Rege 1
3320 -
162
Rege
3330 -
52
Rege 1
334® -
1 3
Regel
335® -
1
Rege 1
3360 -
1 47
Regel
3370 -
40
Rege 1
3380 -
24 1
Rege 1
3390 -
226
Regel
3400 -
1 39
Rege 1
341® -
20
Regel
3420 -
99
Regel
3430 -
58
Regel
3440 -
1 96
Rege 1
346® -
1 72
Rege i
3 460 -
88
Regel
3470 -
58
Rege 1
3480 -
58
Rege 1
3490 -
58
Rege 1
3500 -
124
Regel
35 10 -
1 33
Rege 1
3520 -
58
Rege 1
3530 -
58
Rege 1
3540 -
58
Rege 1
3550 -
1 1 2
Rege 1
3560 -
1 00
Regel
3570 -
37
Rege 1
35S0 -
1 86
Rege 1
3590 -
243
Rege 1
3600 -
25
Rege 1
3610 -
36
Rege 1
3 €2® -
58
Rege 1
3630 -
58
Regel
364 0 —
58
Rege 1
3650 -
1 37
Regel
3660 —
42
Regel
3670 -
23
Rege 1
3680 -
249
Regel
3690 -
7
Rege 1
3700 -
2 1 S
Rege 1
3710 -
216
Regel
3720 -
216
Regel
3730 -
1 1 3
Rege 1
374® -
254
Regel
375® -
232
Regel
3760 -
216
Regel
377® -
53
Rege 1
378® -
58
Rege 1
379® -
58
Rege 1
3800 -
1 6®
Rege 1
3810 -
53
Rege 1
3826 -
82
Regel
3830 -
7
Regel
3846 -
1 68
Rege 1
385® -
1 35
Regel :
386® -
78
Rege l :
38 70 -
58
Regel :
388® -
58
Regel :
3890 -
58
Regel :
3960 -
91
Regel :
3910 -
246
Regel :
3920 - ;
206
Regel :
393® -
20
Rege 1 :
3940 -
1 1 9
Regel :
395® -
204
Regel :
396®
-
1 74
Regel :
397®
-
232
Regel :
3980
-
73
Regel :
399®
-
202
Rege ] :
4000
-
80
Regel ;
401 0
-
1 90
Rege 1 :
4020
-
56
Regel :
4030
-
16
Rege 1 :
4040
-
1 66
Regel :
4050
-
38
Regel :
4060
-
5
Regel :
4070
-
1 68
Regel :
4030
-
1 05
Regel :
4 09®
-
1 94
Rege 1 :
4)00
-
59
Regel :
4110
-
34
Rege 1 ;
4 1 20
-
1 38
Regel :
4130
-
1 58
Regel :
414®
-
255
Regel :
4150
-
2 1 7
Regel :
4160
-
1 46
Regel :
41 70
-
58
Regel :
4180
-
39
Regel :
4 190
-
1 1 7
Regel :
4200
-
58
Regel :
42 1 0
-
58
Regel :
4220
-
58
Regel :
4230
-
56
Regel :
4240
-
47
Regel :
425®
-
60
Regel :
426®
-
31
Regel :
427®
-
3
Regel ;
4280
-
1 22
Regel :
4290
-
40
Regel :
4300
-
91
Regel :
4310
-
23)
Regel :
432®
-
1 0
Regel :
4330
-
96
Rege 1 :
4340
-
72
Regel ;
4350
-
1 97
Regel :
4360
-
1 83
Rege 1 :
437®
-
75
Regel :
4380
-
1 1 9
Regel ;
4390
-
1 42
Regel :
4400
-
24 1
Regel :
44 1 0
-
1 95
Regel :
4420
-
20
Regel :
4430
-
90
Regel :
4440
-
21 1
Regel :
445®
-
63
Rege 1 :
4460
-
1 34
Regel :
4470
-
87
Regel :
4480
-
16
Regel :
4490
-
2 49
Regel :
4500
-
1 42
Regel :
4510
-
58
Rege 1 :
4520
-
58
Rege 1 :
4530
-
58
Regel :
4640
-
206
Regel :
4550
-
213
Rege 1 ;
4560
-
180
Regel :
4570
-
62
Regel :
4580
-
33
Regel :
4590
-
46
Regel :
4600
-
38
Regel :
4610
-
25d
Regel :
4620
-
227
Regel :
4630
-
212
Rege 1 :
4640
-
1 7
Regel :
4650
-
40
Regel :
4660
-
97
Regel :
4670
-
60
Rege 1 :
4680
-
227
Regel :
4690
-
45
Regel :
4700
-
1 36
Regel :
47 10
-
50
Regel :
472®
-
242
Regel :
4730
-
54
Regel :
4740
-
55
Rege 1 :
4750
-
76
Rege 1 :
4760
-
1 69
Regel :
477Ö
-
1 71
Rege 1 :
4780
-
35
Rege 1 :
4790
-
93
Regel !
4800
-
201
Regel :
4810
-
202
Totaal
: 54630
KNIGHT RIDERS
ADVENTURE
Knight Riders Adventure is een zeer een-
voudig tekstadventure, geschikt voor
MSH-1 en 2, dat voor weinig problemen zal
zorgen. Het verhaal is nogal fantasieloos
en eenvoudig, doch vanwege het geringe
aantal adventures dat wordt ingestuurd,
vonden we toch dat het geplaatst moest
worden. Al met al weer eens iets anders.
10 »
20 1 *— KNIGHT- RIDERS ADVENTURE — *
30 * * Door: Enrico van den Boom *
40 * * *
50 1 * <c) 1989 MSX-Gids Lelystad *
60 *
70 *
80 GOSUB 2700: ‘KNIGHT-R I DER SOUND
90 CLEAR: DEFINTA-Z: KID=0: TB=0
100 CLS: PRINT: PRINT ”U staat aan het begin
van Uw adventure:”
110 PRINT ”Het bevrijden van Micheal Knigh
t. Zou het lukken?”
120 PRINT
130 PRINT ”Voor U ligt de snelweg naar New
York metzijn ”;
140 PRINT ” gevaarlijke viadukten. Volgens
de”
150 PRINT "kaart kunt U hier alleen maar d
e snelwegvolgen. ”
160 PRINT "U komt op een punt aan waar in
het"
170 PRINT "noorden een berg opdoemt; een b
erg met"
18@ PRINT "een opvallend uitgehouwen presi
dents hoofd.”
190 PRINT "In het oosten loopt de snelweg
naar Boston."
200 PRINT
210 PRINT "U kunt rechtdoor gaan (1)"
220 PRINT "of de snelweg naar Boston volve
n <2>"
230 PRINT
240 INFUT K
250 PRINT
260 IF K=2 THEN GOTO 330
270 CLS: PRINT "U volgt de snelweg naar New
York, ”
9
een ingestor
280 PRINT "rechts ziet U hoge bergen en li
nks bossen.”
290 PRINT "Maar wat is dat.
te”
300 PRINT "viadukt! Dit is het definitieve
einde. ”
310 FORA=0TO5000: NEXTA: C0L0R15, 1:FORA=0TO1
^^fcniiïïSn 14 ’ 1 : FQRA=0TO100: NEXTA: COLOR
13, 1 : FORA-0TO100: NEXTA: COLOR 12,1:FORA=0T
0100: NEXTA: COLOR 1, 1 : FORA=0TO100: NEXTA: CLS:
COLOR 15,1,1
320 GOTO 2640
Jon !r LS:P8IFr " U vol S t de snelweg naar Bos
340 PRINT "U passeert een ingestorte viadu
kt. . . gelukkig"
350 PRINT "zonder ongelukken. Hier ziet U
aan de"
en^ Dit’^ n °ordelijke kant een pad uitkom
o70 PRINT "pad loopt langs de berg in noor
delijke richting”
380 PRINT
390 PRINT ”U kunt de snelweg volgen (1)"
400 PRINT "of het pad inslaan (2)”
410 PRINT
420 INPUT K
430 PRINT
440 IF K=2 THEN GOTO 520
c kS:PRINT ”U volgt de snelweg. Rechts
ziet U hoge"
460 PRINT "rotswanden."
470 PRINT "Na een poos ziet U links bossen
4u0 PRINT "Nu gaat U door een tunnel. . . Wa
t is dat?Hij stort in!!"
490 PRINT "Helaas, U brengt het er niet le
vend van af."
500 FGRA=0TO5000: NEXTA: C0L0R15, 1 : FORA=0TO1
00: NEXTA: C0L0R14, 1 : FORA=0TO100: NEXTA: COLOR
13, 1:FORA=0TO100: NEXTA: COLOR 12, 1:FORA=0T
0100: NEXTA: C0L0R1, 1: FURA=0TO100: NEXTA:CLS'
COLOR 15,1,1
510 GOTO 2640
520 CLS: PRINT ”U vervolgt Uw weg in noorde
lijke"
530 PRINT "richting,"
540 PRINT
550 PRINT "U bereikt nu een tweesprong."
560 PRINT ”U kunt in noordelijke richting
gaan <D" °
570 PRINT "of naar het oosten af buigen <2>
580 PRINT
590 INPUT K
600 PRINT
610 IF K=2 THEN GOTO 700
620 CLS: PRINT ”U loopt in noordelijke rich
ting door."
630 PRINT "na een poosje hoort U het gelui
d van" °
640 PRINT "vallende rotsblokken. Dit moete
n de be- roemde”
650 PRINT "vallende rotsen des doods zijn.
U staat bovenop een rots.”
660 PRINT "Plotseling wordt U naar beneden
geduwd. ”
670 PRINT "Het wordt zwart voor Uw ogen. . .
680 FORA=0TO6000: NEXTA: C0L0R15, 1 : FORA=0TO1
00: NEXTA: COLOR14, 1 : FORA=0TO100: NEXTA: COLOR
13,1: FQRA=0TO100 : NEXTA : COLOR 12,1: FORA=0T
0100: NEXTA: C0L0R1, 1 : FORA=0TO100 : NEXTA: CLS:
COLOR 15, 1, 1
690 GOTO 2640
700 CLS: PRINT ”U gaat in oostelijke richti
ng verder.”
710 PRINT "Links liggen bossen en rechts z
iet u
720 PRINT "bergen."
730 PRINT "Na een poos ziet U in de verte
een
740 PRINT ” tweesprong. ”
750 PRINT
omen P ” IHT " U bent ° P 6611 twees P ron S aangek
Q) 1 ,, PR INT ” ü kunt in noordelijke richting
780 PRINT "of in oostelijke richting (2)"
790 PRINT "Uw weg vervolgen.”
800 PRINT
810 INPUT K
82 0 PRINT
830 IF K=2 THEN GOTO 1210
rdelijke” RIFr " ü vervol S t nu de we S in noo
850 PRINT "richting. U loopt door een bos.
860 PRINT ”U bent bij een grot aangekomen.
870 IF KID=1 THEN GOTO 960
880 PRINT
890 PRINT "Vat is dat. . . daar staat de wag
en van Kicheal Knight."
900 PRINT "U kunt KID meenemen (1)”
910 PRINT "of laten staan (2)"
920 PRINT
930 INPUT K
940 PRINT
950 IF K=1 THEN LET KID=1
960 CLS: PRINT "U gaat verder. Hier splitst
de weg zich.”
970 PRINT
980 PRINT "U kunt naar rechts (1) of naar
links (2)"
990 PRINT
1000 INPUT K
1010 PRINT
1020 IF K=2 THEN GOTO 1130
1030 CLS: PRINT "U slaat rechtsaf, de weg m
aakt een” ö
1040 PRINT "flauwe bocht, links en rechts
is er bos. ”
1050^ PRINT ”De sfeer wordt steeds beangst!
ger .
1060 PRINT "De reden wordt ook al snel dui
del ijk: "
1070 PRINT "De weg leidt naar een kamp van
de kidnap-pers. "
1080 PRINT "Plotseling verschijnen overal"
1090 PRINT "mannen. U hoort ze schieten"
1100 PRINT "u voelt dat de kogels U raken.
Dan wordt alles zwart.”
1110 FORA=0TO7000: NEXTA : COLOR 15, 1:FORA=0TO
100: NEXTA: C0L0R14, 1 : FORA=0TO100: NEXTA: COLO
R 13, 1 : FORA=0TQ100: NEXTA: COLOR 12,1:FORA=0
TO100: NEXTA: C0L0R1, 1 : FORA=0TO100: NEXTA: CLS
: COLOR 15, 1, 1
1120 GOTO 2640
1130 CLS: PRINT "U gaat naar links. Eerst k
omt U door”
1140 PRIÏÏT ”bossen. ”
1150 PRINT "Op een gegeven moment passeert
U een”
1160 PRINT "ingestarte viadukt. Af en toe
hoort U geluiden van vallende stenen.”
11/0 PRIÏFT ”Be weg maakt ineens een scherp
e bocht” F
1180 PRIüFT "naar links. Heeft U dit punt a
1 eerder”
1190 PRINT "gezien?”
1200 GOTO 120
1210 CL-S: PRINT "U gaat in oostelijke richt
ing. rechts"
1220 PRINT "zijn bergen en links ziet U bo
ssen. "
1220 PRINT "U bent nu op een punt aangekom
en waar”
1240 PRINT "een afspitsing in noordelilke
richting”
1250 PRINT "loopt."
1260 PRINT
1270 PRINT "U kunt rechtdoor <1>"
1280 PRINT "of in noordelijke richting gaa
n (2)” ö
1290 PRINT
1300 INPUT K
1310 PRINT
1320 IF K=2 THEN GOTO 1390
1330 CLS: PRINT "U gaat verder. Voor U is e
en put en”
1340 PRINT "voor U het weet rijd U met KID
in de put”
1350 PRINT "seconden lang valt U. . . en dan
it
1360 PRINT "wordt alles zwart.”
1370 FORA=0TO5000: NEXTA: C0L0R15, 1: FORA=0TO
100: NEXTA: C0L0R14, 1: FGRA=0TO100: NEXTA: COLO
R 13, 1: FORA=0TO100: NEXTA: COLOR 12,1:FORA=0
TO100: NEXTA: C0L0R1 , 1 : FORA=0TO100: NEXTA: CLS
: CULQR 15, 1, 1
1380 GOTO 2640
1390 CLS: PRINT "U gaat in noordelijke rich
ting. "
1400 PRINT "Na een poosje Door de bossen g
ereden te"
1410 PRINT "hebben, ziet U een splitsing."
1420 PRINT
1430 PRINT ”U kunt in oostelijke richting
( 1 )" ö
1440 PRINT "of in noordelijke richting gaa
n (2)"
1450 PRINT
1460 INPUT K
1470 PRINT
1480 IF K=2 THEN GOTO 1990
1490 CLS: PRINT "U zet Uw tocht in oostelij
ke richting"
1500 PRINT "voort.”
1510 PRINT ”U gaat door een bos en steekt
via een”
1520 PRINT "hangbrug de rivier over."
1530 PRINT
1540 PRINT "U bent nu hoog in de bergen bi
j een"
1550 PRINT "tweesprong. U kunt verder naar
het”
1560 PRINT "noorden (1) of naar het zuiden
(2) gaan"
1570 PRINT
1580 INPUT K
1590 PRINT
1600 IF K=2 THEN GOTO 1660
1610 CLS: PRINT "U gaat verder in noordelij
ke richting.”
1620 PRINT "Plotseling hoort U een schot.
Als U"
1630 PRINT "achterom probeert te kijken is
het al telaat. . . Alles wordt zwart.”
1640 FORA=0TO5000 : NEXTA: C0L0R15, 1 : FORA=0TO
100: NEXTA: COLOR14, 1 : FORA=0TO100: NEXTA: COLO
R 13, 1: FORA=0TO1 00 : NEXTA : COLOR 12,1:FORA=0
TO100: NEXTA: C0L0R1, 1: FORA=0TO100: NEXTA: CLS
: COLOR 15, 1, 1
1650 GOTO 2640
1660 CLS: PRINT ”U gaat in zuidelijke richt
ing verder.”
1670 PRINT "plotseling vliegt een helikopt
er boven U. ”
1680 IF KID=1 THEN GOTO 1750
1690 PRINT "Helaas, U zit niet in Micheal
Knights auto. . Ondanks”
1700 PRINT "Uw moedige pogingen heeft U ge
en schijn”
1710 PRINT "van kans. De piloot schiet en
raakt U. . . "
1720 PRINT "Het wordt zwart voor Uw ogen. .
i i °
1730 FORA=0TO5000 : NEXTA: C0L0R15, 1 : FORA=0TO
100: NEXTA: COLOR14, 1 : FORA=0TO100: NEXTA: COLO
R 13, 1:FORA=0TO100; NEXTA: COLOR 12,1:FORA=0
TO100: NEXTA: COLOR1, 1 : FORA=0TO100: NEXTA: CLS
: COLOR 15,1,1
1740 GOTO 2640
1750 PRINT "Gelukkig zit U in Micheals aut
o. U”
1760 PRINT "schakelt het pantser in, het w
ordt een gevecht op leven en dood. "
1770 PRINT "U rijdt hard rond, en de heli
vliegt laag achter U”
1780 PRINT "plots doemt een stijle berg wa
nd op en U draait naar links. De piloot z
iet het te laat en vliegt te pletter.”
1790 PRINT ”U heeft gewonnen.”
1800 FORA=0TO10000: NEXTA
1810 PRINT
1820 PRINT "U vervolgt Uw weg en in de ver
te doemt"
1830 PRINT "het grote kamp van de kidnappe
rs op. ”
1840 PRINT "U heeft het gevonden. Met klop
pend hart gaat U verder."
1850 FORA=0TO10000: NEXTA
1860 PRINT ”U rijdt het kamp in. Even late
r staat u”
1870 PRINT "voor een gesloten hek.”
1880 IF TB=1 THEN GOTO 1940
1890 PRINT "U heeft geen turbo boost, dus
voorzich- tig”
1900 PRINT "probeert U het hek open te duw
en. Op dat" ;
1910 PRINT "Moment gaat er een alarm, en r
uim 200 man schiet op U."
1920 FORA=0TO6000: NEXTA: C0L0R15, 1:FORA=0TO
100: NEXTA: COLOR14, 1: FORA=0TO100: NEXTA: COLO
R 13, 1 : FORA=0TO 100: NEXTA: COLOR 12,1:FORA=0
TO100: NEXTA: C0L0R1, 1 : FORA=0TO100: NEXTA: CLS
: COLOR 15,1,1
1930 GOTO 2640
1940 PRINT "Met de turbo boost springt U o
ver het hek.”
1950 PRINT "dan ziet U Micheal Knight..."
1960 PRINT "U laat hem instappen en U gaat
met een noodgang terug naar huis. "
1970 PRINT: PRINT "GEFELICITEERD!!"
1980 END
1990 CLS: PRINT ”U gaat in noordelijke rich
ting. "
2000 PRINT
2010 PRINT "Het duurt niet lang of U komt
bij een”
2020 PRINT "splitsing. U kunt naar het oos
ten (1)"
2030 PRINT "of naar het westen <2>"
2040 PRINT
2050 INPUT K
2060 PRINT
2070 IF K=1 THEN GOTO 2140
2080 PRINT ”U vervolgt Uw weg richting het
westen. ”
11
2090 PRINT "Het duurt niet lang of U komt
in het”
21®® PRINT "kidnaperskamp. Plotseling hoor
2110 PRINT "kogels op U afkomen en alles w
ordt zwartvoor Uw ogen.”
2120 FORA=0TO5000 : NEXTA : C0L0R15 , 1:FORA=0TO
100: NEXTA: C0L0R14, 1: FORA=0TO100: NEXTA: COLO
R 13, 1:FORA=0TO100: NEXTA: COLOR 12,1:FORA=0
TO100: NEXTA: C0L0R1, 1: FORA=0TO100: NEXTA: CLS
: COLOR 15, 1, 1
2130 GOTO 2640
2140 CLS: PRINT ”U volgt de weg in oostelij
ke richting”
2150 PRINT ”Nu maakt de weg een bocht in
noordelijke" ;
2160 PRINT " richting. De weg lijkt naar e
en grot te leiden.”
2170 IF TB=1 THEN GOTO 2260
2180 PRINT ”U bevindt zich inderdaad in ee
n"
2190 PRINT "prachtige grot.”: PRINT
2200 PRINT "op een soort altaar ligt de tu
rbo boost” ;
2210 PRINT ” voor KID. U kunt hem inbouwen
(1> of laten liggen (2)”
2220 PRINT
2230 INPUT K
2240 PRINT
2250 IF K=1 THEN LET TB=1
2260 CLS: PRINT "De grot loopt door de berg
en.” °
2270 PRINT "Direkt als U de grot uitkomt.
kunt U in”
2280 PRINT "westelijke (1) of in oostelijk
e”
2290 PRIÏÏT "richting (2) Uw weg voortzette
n”
2300 PRINT
2310 INPUT K
2320 PRINT
2330 IF K=2 THEN GOTO 2410
2340 CLS: PRINT ”De weg loopt vervolgens do
or de bergen”
2350 PRINT "en buigt dan af in zuidelijke
richting. ”
2360 PRINT "Daar liggen bossen en..."
2370 PRINT "het kidnaperskamp. Het is te 1
aat om”
2380 PRINT "nog terug te keren...”
2390 FORA=0TO5000 : NEXTA : C0L0R15 , 1 : FORA=0TO
100: NEXTA: COLOR 14, 1: FORA=0TO100: NEXTA: COLO
R 13, 1:FORA=0TO100: NEXTA: COLOR 12,1:FORA=0
TO100: NEXTA: COLOR 1, 1: FORA=0TO100: NEXTA: CLS
: COLOR 15, 1, 1
2400 GOTO 2640
2410 CLS; PRINT "U volgt Uw weg in oostelil
ke richting.”
2420 PRINT "Na een aantal bochten komt U b
ij een"
2430 PRINT "snelweg. De snelweg is te geva
ar lijk om over te steken."
2440 PRINT
2450 PRINT ”U kunt de snelweg in noordelii
ke (1)”
2460 PRINT "of in zuidelijke richting (2)
volgen. ”
2470 PRINT
2480 INPUT K
2490 PRINT
2500 IF K=2 THEN GOTO 2580
2510 CLS: PRINT "U volgt de snelweg in noor
delijke”
2520 PRINT "richting.”
2530 PRINT "Plotseling hoort U het geluid
van iets dat instort”
2540 PRINT "voordat ïï terugkunt, is het te
laat. ”
2550 PRINT "Alles wordt zwart.”
2560 FQRA=0TO5000 : NEXTA: C0L0R15, 1: FORA=0TO
100: NEXTA: C0L0R14, 1 : FORA=0TO100: NEXTA: COLO
R 13, 1: FORA=0TO1 00: NEXTA: COLOR 12,1:FORA=0
TO100 : NEXTA: C0L0R1, 1: FORA=0TO100: NEXTA: CLS
: COLOR 15, 1, 1
2570 GOTO 2640
2580 CLS: PRINT "Na een poosje hoort U wate
rvallen. ”
2590 PRINT "Verder kunt U niet. Gelukkig z
iet U een” °
2600 PRINT "pad op de noordelijke oever."
2610 PRINT "U besluit dit pad te volgen.”
2620 FORA=0TO6000: NEXTA
2630 GOTO 520
2640 CLS: PRINT: PRINT "Hiermee is dit adven
ture-spel afgelopen.”;
2650 PRINT ”U kunt het nog een keer spelen
door"
2660 PRINT" de [ R 3 toets in te drukken,”
2670 INPUTQS
2680 IF Q$=”R"OR Q$="r”THEN RUN ELSE END
2690 END
2700 ’ KNIGHT-RIDER SOUND
2710 ’
2720 KEY OFF: SCREEN0: WIDTH37: COLOR10, 1 , 1 : C
LEAR 300
2730 PR I NT” oo <noOOOOO{OOOCD 00 00000000 000000 OOOOOTOOaKDOOOOOOOOOO oooo oooo
000000000000* f
2740 FOR T=1 T013: LOCATE 0, T: PRINT"®" : LQCA
TE 39, T: PRINT”®” ;: NEXT T
2750 PR INT” tDOO <»«>«)«><Doooooooooooooo<Dooooooooooooa>oooooooooooooooooo
00 00 00 00 0000’ 1
2760 LOCATE 7,3:PRINT”K N I G H T R I D
E R”
2770 LOCATE 7, 4: PRINT”
»l
2780 LOCATE 4,7:PRINT”A SHADOWY FLIGHT
INTO THE"
2790 LOCATE 4 , 9 : PR I NT” DANGEROUS WORLD OF
A MAN, WHO"
2800 LOCATE 10, 11; PR INT” DOES NOT EXIST
LOCATE 0,16 “ ‘
2810 ' MUZIEK DATA
2820 A$=” M1000S10T120O4"
2830 B$=”M500S10T 12003"
2840 C$=” V15T140O4L8DDEDAAAAO5DDEDO4AAAADD
EDAA05DDL1C”
2850 D$=” V15T140O3L8DDEDAAAAO4DDEDO3AAAADD
EDAA04DDL1C"
2860 E$=” L8AL16A#AAA#AAA#AAAG#AAA"
2870 FS="L8GL16G#GGG#GGG#GGGF#GGG"
2880 G$=AS+E$+E$ : H$=A$+F$+F$
2890 I$=B$+E$+E$: J$=B$+F$+F$
2900 PLAY CS, DS
2910 FOR T=0 T0 3
2920 PLAY GS, 1$
2930 PLAY H$,J$
2940 NEXT T
2950 PLAY C$+"05D” , D$+"Q4D"
^2960 I F PLAY(1) 0R PLAY<2 > OK PLAY (3) THEN
2970 COLOR 15, 1, 1: WIDTH40:CLS
2980 GOTO 90
CONTROLETELLING
Regel : 1 0 - 50
Regel : 20 - 58
Regel : 30-58
Regel : 40-58
Regel : 50 - 58
Regel : 60-58
Regel : 79-58
Regel : 80-197
Regel : 90 - 231
Regel : 100-122
Regel : 1 1 0 - 66
Regel : 120-145
Regel : 1 30 - 43
Regel : 140-122
Regel : 1 50 - 46
Regel : 160-214
Regel : 170-211
Regel : 1 80 - 5
Regel : 1 90 - 22
Regel; 2 00 - 145
Regel : 210-111
Regel; 22ö - 1 öS
Regel: 230 - 145
Regel ; 240 - 240
Regel: 250 - 145
Regel ; 260 - 20
Regel : 270 - 1 06
Regel : 260 - 209
Regel; 29© - 125
Regel : 3O0 - 171
Regel ; 31 0 - 11
Regel: 320 - 17
Regel : 330 - 242
Regel : 340 - 2
Regel: 350 - 58
Regel ; 360 - 1
Regel : 370 - 155
Regel ; 380 - 1 45
Regel ; 390 - 1 1 9
Regel; 400 - 41
Regel : 41 0 - 145
Regel : 420 - 240
Regel ; 430 - 1 45
Regel
440 -
- 21 1
Regel
450 -
■ 56
Regel
: 460 - 104
Rege 1
: 470 -
71
Regel
: 480 -
230
Rege 1
490 -
1 98
Regel
: S00 -
1 1
Regel
510-
17
Regel
520 -
184
Rege 1 :
530 -
123
Regel
540 -
1 45
Regel :
550 -
71
Regel :
560 -
170
Regel :
570 -
169
Regel :
580 -
1 45
Regel ;
59 0 -
240
Regel :
600 -
1 45
Regel ;
610 -
1 35
Regel :
620 -
1 62
Regel :
630 -
237
Regel :
640 -
190
Regel :
660 -
210
Regel :
660 -
92
Regel :
670 -
227
Regel :
680 -
247
Regel :
690 -
1 7
Regel :
700 -
126
Regel ;
710-
35
Regel :
720 -
1 50
Regel :
730 -
172
Regel :
740 -
1 13
Regel :
760 -
145
Regel ;
760 -
60
Regel :
770 -
243
Rege 1 :
780 -
53
Regel :
790 -
74
Regel :
800 -
1 45
Regel :
810 -
240
Regel :
820 -
1 45
Regel :
830 -
1 35
Regel :
840 -
184
Regel :
856 -
252
Regel ;
860 -
0
Regel :
870 -
24
Regel :
880 -
1 45
Regel :
890 -
69
Regel :
900 -
48
Regel :
910 -
216
Regel :
920 -
146
Regel :
930 -
240
Regel ;
940 -
145
Regel :
950 -
146
Regel :
960 -
217
Regel :
970 -
1 46
Regel :
980 -
212
Regel :
990 -
1 45
Regel :
1000 -
240
Regel :
1010 -
145
Regel :
1020 -
55
Regel :
1030 -
1 98
Regel :
1040 -
57
Regel ;
1050 -
164
Regel ;
1060 -
83
Regel :
1070 -
16
Regel :
1080 -
126
Regel :
1090 -
21 1
Regel ;
1100 -
223
Regel :
1110 -
227
Regel ;
1120-
17
Regel :
1130-
88
Regel :
1140-
1 73
Regel ;
1150-
1 7
Regel
: 1160
1 86
Regel :
; 1170
-
99
Regel :
: 1180
-
83
Regel ;
1190
-
1 82
Regel ;
1200
-
47
Regel ;
121 O
-
127
Regel :
1220
-
1 60
Regel ;
1 230
-
85
Regel :
1240
-
1 70
Rege 1 :
1250
-
81
Regel :
1 260
-
1 45
Regel :
1 270
-
1 84
Regel :
1 280
-
73
Regel :
1290
-
1 46
Regel :
1 300
-
240
Regel :
131 0
-
1 46
Regel :
1 320
-
60
Regel :
1 330
-
1 77
Regel :
1 340
-
91
Regel :
1350
-
34
Regel :
1 360
-
220
Regel :
1 370
-
1 1
Regel :
1 380
-
17
Regel :
1 390
-
61
Regel :
1 400
-
230
Regel :
1 41 0
-
89
Regel :
1 420
-
145
Regel :
1 430
-
1 60
Regel ;
1 440
-
73
Regel :
I 450
-
1 46
Regel :
1 460
-
240
Regel J
1 470
-
1 45
Regel :
1 480
-
1 50
Regel :
1 490
-
1 40
Regel :
1 500
-
93
Regel :
1510
-
242
Regel :
1 520
-
231
Regel :
1 S30
1 45
Regel :
1 540
-
3
Regel :
1550
1 47
Regel :
1560
1 73
Regel : l 67© - 1 46
Regel : 1 580 - 240
Regel : 1 590 - 1 45
Regel : 1 600 - 75
Regel : 1610-219
Regel : 1 620 - 83
Regel: 1630 - 182
Regel : 1 640 - 1 1
Regel : 1 650 - 17
Regel : 1 660 - 117
Regel : 1 670 - 1 09
Regel: 1680 - 49
Regel : 1 690 - 80
Regel: 1700 - 49
Regel : 1710 - 122
Regel : 1 720 - 181
Regel : 1730 - 1 1
Regel : 1 740 - 1 7
Regel : 1 750 - 205
Regel: 1760 - 52
Regel : 1 770 - 1 75
Regel : 1780 - 151
Regel : 1 790 - 37
Regel: 1800 - 237
Regel ; 1816-145
Regel : 1 820 - 1 32
Regel ; 1 830 - 12
Regel : 1 840 - 21
Regel ; 1 850 - 237
Regel ; 1 860 - 1 42
Regel : 1 870 - 26
Regel ;
: 1880
-
1 74
Regel :
; 1 890
-
1 33
Regel :
: 1 900
-
53
Regel :
1910
-
44
Regel :
: 1920
-
247
Regel i
1 930
-
1 7
Regel :
1940
-
246
Regel :
1950
-
91
Regel :
1 960
-
184
Regel ;
1 970
-
174
Regel ;
1980
-
129
Regel :
1990
-
51
Regel .*
2000
-
145
Regel :
2010
-
238
Regel ;
2020
-
212
Regel :
2030
-
70
Regel :
2040
-
1 45
Regel :
2050
-
240
Regel :
2060
-
145
Rege 1 ;
2070
-
44
Regel :
2080
-
239
Regel :
2090
-
153
Regel ;
2100
-
143
Regel ;
21 1 0
-
100
Regel :
2120
-
1 1
Regel ;
2130
-
17
Regel :
2140
-
1 31
Regel :
2150
-
2
Regel :
2160
-
1 79
Regel :
2170
-
239
Regel :
2180
-
47
Regel :
2190
—
129
Regel :
2200
-
1 59
Regel :
221 0
-
1 57
Regel :
2220
-
145
Regel ;
2230
-
240
Regel :
2240
-
145
Regel ;
2250
-
80
Regel ;
2260
-
31
Regel :
2270
-
153
Regel :
2280
-
19
Regel :
2296
-
51
Regel ;
2300
-
I 45
Regel :
2310
-
240
Regel
Regel
Regel
Regel
Regel
Regel
Regel
Rege 1
Regel
Regel :
Regel :
Regel :
Regel ;
Regel ;
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel ;
Regel ;
Regel :
Regel :
Regel :
Regel :
Regel ;
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Rege 1 :
Regel :
Regel :
Regel :
Regel :
Regel :
Rege 1 :
Regel :
Regel :
Regel ;
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel :
Regel ;
Rege 1 :
Regel J
Regel ;
Regel ;
Totaal :
: 2320 -
i 2330 -
: 2340 -
: 2350 -
: 2360 -
: 2370 -
: 2380 -
: 2390 -
: 2400 -
: 2410 -
: 2420 -
: 2430 -
: 2440 -
: 2450 -
: 2460 -
: 2470 -
: 2480 -
: 2490 -
: 2500 -
2510 -
2520 -
2530 -
2540 -
2556 -
2560 -
2570 -
2580 -
2530 -
2600 -
2610 -
2620 -
2630 -
2640 -
2656 -
2660 -
2670 -
2680 -
2690 -
2700 -
2710 -
2720 -
2730 -
2740 -
2750 -
2760 -
2770 -
27QÖ -
2790 -
2868 -
2810 -
2820 -
2830 -
2840 -
2850 -
2660 -
2870 -
2886 -
2890 -
2900 -
2910 -
2920 -
2930 -
2940 -
2950 -
2966 -
2970 -
2980 -
38034
1 45
60
227
42
42
226
56
1 1
17
1 80
1 41
212
145
121
5
145
240
1 45
231
26
123
1 62
228
188
1 1
17
57
1 74
55
234
61
1 93
1 90
139
163
250
246
129
58
58
1 82
241
25
241
58
1 39
165
30
71
58
136
162
214
21 1
52
1 36
67
73
220
35
229
231
247
213
75
97
17
NABESTELLINGEN OUDE
NUMMEBS MSX-GIDS:
De nummers 1 t/m 11, K2 en 16 van de MSH Gids zijn GEHEEL UITVERKOCHT. Hieron-
der volgt een overzicht van de nummers, welke nog wel verkrijgbaar zijn met een
beknopte omschrijving van de inhoud:
MSH GIDS NUMMER 12
LISTINGS: MAZE, SCRAMBLE, DISKLOADER, MSH DUMP SCREEN 2, BALLETJE- BALLETJE
(MSH-2), TITELDOOS (MSH-2)
Verder de cursus BASIC, machine taal en Rekenen op de M5K. Test NMS- 8280 en 20
softwaretitels beschreven.
MSX-GIDS NUMMER 13
LISTINGS: POSTER DESIGNER, JUMPING JACK. WRITING RACE, BESTAND (DATA BASE).
WOORDENLADDER, SCHUIFPUZZEL, REKENMATRIH, DE MUUR (MSK-2), BINAIR.
Verder "Rekenen op de MSH" (2), MSH-Machinetaal (4), Test Philips NMS1255 Modem,
veel softwarerecensies (o.a. Maze of Galious & Q-Bert), spelpoke's en tips.
MSH-GIDS NUMMER 14
LISTINGS: SPREADSHEET. OPTELLEN EN AFTREKKEN, MENS ERGER JE NIET, DOMINEUR,
RAIDER
Verder: MSX-Machlnetaal (5), Rekenen op de MSH (3), Leer, Probeer en Programmeer
(5) en veel software- en adventurerecensies, tips, poke's, kaarten.
MSH-GIDS NUMMER 15
LISTINGS: SCREEN 1 EDITOR, BREAK-IT, MUSIC COMPOSER, BARRIÈRE.
Verder: Rekenen op de MSH (4), Leer, Probeer en Programmeer (6), MSH Machinetaal
(Slot), Hardwaretests van Philips NMS 1205 Muziekmodule en NMS HBO Keyboard +
veel softwarerecensies, spel- en adventuretips (o.a. kaart Super Rambo Special).
MSH GIDS NUMMER 17
LISTINGS: KRIPY JACK. SCHARRELEI, DISK M0NIT0R/EDIT0R, SCREEN PROTECTION, MER-
GE MASTER, DISK DATALISTER, MOUSE 5 TEKENPROGRAMMA (MSK-2), 240K SECTOR COPY
(MSH-2)
Verder Programmeren met Screen 1, Leer, Probeer en Programmeer (deel 8), Softwa-
rerecensies: Turbo 5000, Adventuretips, Eye, Salamander, Super Triton, Dragon King,
Mirai en Final Countdown
MSX-GIDS NUMMER 18
LISTINGS: DBASE (DATABASE), TOPOGRAFIE FRANKRIJK EN WEST-DUITSLAND, OMTREK
EN OPPERVLAKTE, VLAGGENQUIZ, MOUSE 7 TEKENPAKKET (MSX-2)
Verder “Disk- en Cassettegebruik, Leer, Probeer en Programmeer (deel 9), Adventu-
retips, Kaarten: Vampire, Future Knight, Avenger, Spy Story, Snowball, Bastard. Re-
censies: Scramble Formation, Gunsmoke, California Games, Colossus Chess 4,0, The
Flintstones, A.R.A.M.O., Playhouse Strippoker ♦ pokes & tips.
MSH-GIDS NUMMER 19
LISTINGS: UITBREIDING SHEAT, MACHINETAAL DATA CONVERSIE, INFO MENU, STERREN-
REGEN, ABACUS, STIEREN VANGEN, MOUSE 8 TEKENPROGRAMMA (MSH2), STARJET II
(MSH2), RICH MAN, POOR MAN (MSH2)
Verder: Leer, Probeer en Programmeer (10), Danger Mouse, Time & Magie, Adventure-
tips, Elite Tips, Freekick. Pokes l Tips, Kaart + Tips Avenger, Bubble Bobble, Patien-
ce en Klaverjassen. Scribe Tekstverwerker, Trantor, Gutt Blaster, Pinball Blaster,
Venom Strikes Back (MASK 3), Topple Zip (MSH2), Guardic en Krakout.
Oude nummers zijn te bestellen doom overmaking
van Fl. 7,95 pen exemplaar op Postbanknummer
5036011 t.n,v. J.Herps te Lelystad. Voor Belgie Bfr.
155 op Bankrekeningnummer 235-0430464-87 bij de
Generale Bank te Hasselt t.n.v. J.Herps, Postbus
516, 8200 AM LELYSTAD.
13
WERKWOORDEN
SCHEMA
De leerlingen moeten bij dit
programma zelf de juiste
werkwoordsvorm invullen.
Voordat de eerste leerling be-
gint, moet de leerkracht aan-
geven hoeveel leerlingen er
met het programma gaan wer-
ken en hoeveel opgaven ieder
kind moet doen.
één ander :
stam -i- tr
o - t .
zwak
I — 1
TT kofschip]
sta» +
te<n>
kl inker-
veran-
dering
Nadat de leerling zijn of haar naam heeft in-
gevuld, ziet hij of zij dat er werkwoorden in-
gevuld moeten gaan worden, waarna een korte
uitleg komt, gevolgd door een schematische
voorstelling van zaken.
Hierna gaat de leerling aan het werk. Een zin
wordt getoond en het kind moet de juiste
werkwoordsvorm invullen* Door op de spatie—
balk te drukken kan op ieder willekeurig mo-
ment het schema in beeld worden gehaald. Als
het juiste antwoord wordt gegeven, volgt een
belonende opmerking, waarna de volgende op-
gave wordt getoond. Een vakje met hartjes,
onder aan het scherm, laat zien hoeveel op-
gaven reeds goed zijn beantwoord.
Als het gegeven antwoord fout is, wordt dit
gemeld, waarna de leerling naar dat deel van
het schema kan kijken, dat hij of zij nodig
heeft. Na een druk op SELECT kan een tweede
poging worden gewaagd. Als het gegeven ant-
woord nu goed is, krijgt de leerling de vol-
gende opgave. Als het gegeven antwoord in
tweede instantie weer fout is, wordt de juis-
te oplossing getoond. Na de laatste opgave
krijgt de leerling te zien hoeveel opgaven hij
of zij in eerste instantie korrekt heeft ge-
maakt, waarna de volgende leerling aan het
werk kan gaan.
Na de laatste leerling Cof na een onderbre-
king met FE) kan de leerkracht de uitslag te
zien krijgen. Het codewoord is "uitslag".
De leerkracht krijgt naast de naam van de
leerling de volgende gegevens: aantal goed in
eerste instantie, aantal goed in twee beurten
(goed na een fout) en het aantal keren dat
het schema is bekeken. Hierna kan het pro-
gramma desgewenst opnieuw opgestart wor-
den.
0 '
10 GOTO1020
ooooooooooooooooooooooooooooo
o
o
o
o
o
o
o
o
o
o
Verkwoorden-sch ema
De leerlingen moeten de
juiste werkwoordsvorm
invullen. Een schema
geeft wat houvast.
Een programma van
Peter van der Aar
KenO-produkt ies
MSX-gids Lelystad
1989
20
30
40
50
60
70
80
90
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330 DATAD, vragen, Hij mij iets.,vr
oeg
340 DAT AE, passen, In het kleedhokje
. mijn zus haar nieuwe jurk. .paste
350 DATAC, baden, Ti jdens de vakantie
we in de rivier. , baden
360 DATAH, weigeren, De gevangen dieren ....
.... het voedsel. , weigerden
370 DATAB, verbranden, Mijn zusje h
aar dagboek. , verbrandt
380 DATAE, begroeten, De jongen zij
n lieve vriendinnetje. , begroett
390 DATAD, zingen, In de pereboom
e merel het hoogste lied. , zong
400 DATAA, hebben, Ik de grootste e
ierkoek. , heb
410 DATAF, wachten, Ongeduldig de k
inderen op hun ouders. , wachtten
Dit programma bevat
zestig opgaven.
Wilt U opgaven wijzigen?
Zie de "staart" van dit
programma .
Data-regels opgaven
14
CU Ti